Задача ЕГЭ

[PANDA8]

Дан массив состоящий из 20 натуральных элементов. Значение каждого элемента вводится в отдельной строке. Требуется составить программу, позволяющую найти и вывести на экран (в первой строке) количество элементов из данного массива, которые при делении на 4 дают в остатке 2, а при делении на 3 дают в остатке 1, а в последующих строках вывести на экран сами эти элементы (по одному в строке) в порядке их следования в исходном массиве. Как можно решить эту задачу?

[hiho]

Э?

for i := 1 to 20 do begin
   writeln('A[',i,'] = ');
   readln(A[i]);
end;

for i := 1 to 20 do
   if (A[i] mod 4 = 2) and (A[i] mod 3 = 1) then inc(count);

writeln(count);

for i := 1 to 20 do
   if (A[i] mod 4 = 2) and (A[i] mod 3 = 1) then writeln('A[',i,'] = ', A[i]);

[Serge_Bliznykov]

Тема не отражает суть задачи.

ЗАКРЫТО.