ИСПРАВЛЕНО --- Uses crt; {описание переменных} var a,b,c: array [1..20] of integer; x,sum:integer; begin sum:=0; {обнуляем сумму} for x:=1 to 20 do {включаем цикл ввода массивов} begin write('a[',x,']:'); {вывод текста на экран} readln(a[x]); {ввод массива А} write('b[',x,']:'); {вывод текста на экран} readln(b[x]); {ввод массива В} c[x]:=a[x]+b[x]; {формируем массив С} if x mod 2=0 then sum:=sum+c[x]; end; writeln; {переводим указатель на новую строку} for x:=1 to 20 do {цикл вывода массива С} writeln('c[',x,']:',c[x]); {вывод текста на экран} writeln('sum=',sum); {сумма четных элементов массива С} end. --- текст в фигурных скобках удалять не обязательно, он на код не влияет.
Ну, поскольку уточнения по задаче не получил, буду считать, что цифра 1 может встречаться ровно два раза в КАЖДОЙ комбинаций (в противном случае ответ, конечно, будет другой):
Всего используется 4 знака.Нормализуем последовательность к нулю , от этого количество комбинаций не изменится: было : 111111 - 44444 стало: 00000 - 33333
Исключаем из общего количества комбинаций комбинации с двумя единицами (всего 9): 11ххх 1х1хх 1хх1х 1ххх1 х11хх х1х1х х1хх1 хх11х хх1х1 ххх11 значимыми остаются только 3 разряда из 5. 333 в 4-ричной системе счиления равно 63 в 10-ричной. - именно столько комбинаций будет при условии, что два разряда выставлены в единицы. 9х63=563 - столько комбинаций будет всего.
ответыыыыыыыы правильныеееееееее