Даны две последовательности чисел а1, а2, …, аn и b1, b2, …, bn. Найдите количество пар аi, bi, (i = 1, n) таких, что оба числа в паре четные.
Идти по обоим массивам, и проверять очередные элементы обоих массивов на четность:
for i := 1 to n do
if (a[ i ] mod 2 = 0) and (b[ i ] mod 2 = 0) then count := count + 1;
а count - это что?? я просто в этом деле совсем чайник(((((
Ну, тебе ж надо было найти
спасибо)