С клавиатуры вводится число n ,а за ним n целых значений элементов массива посчитайте кол-во четных чисел стоящих на нечетных местах в массиве

Question

С клавиатуры вводится число n ,а за ним n целых значений элементов массива посчитайте кол-во четных чисел стоящих на нечетных местах в массиве

Гость

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

Accepted Answer

var n,i,s:integer; a:array[1..100] of integer; begin read(n); for i:=1 to n do begin read(a[i]); if ((i mod 2)=1) and ((a[i] mod 2)=0) then s:=s+1; end; writeln(s); end.