ПАСКАЛЬ АБС!! 10 КЛАСС! СРОЧНО!! Дан массив А(n). Определите кол-во нечетных элементов массива, стоящих на четных местах. Выведите на экран исходный массив и найденное кол-во.

Question

ПАСКАЛЬ АБС!! 10 КЛАСС! СРОЧНО!! Дан массив А(n). Определите кол-во нечетных элементов массива, стоящих на четных местах. Выведите на экран исходный массив и найденное кол-во.

Гость

Ответ(ы) на вопрос:

Accepted Answer

var n:integer; begin for n:1 to n do begin; read A[n]; if n mod 2=0 then if A[n] mod 2=1 then writeln(A[n]); end; end.