2. Дан массив из N элементов. Определить количество элементов, имеющих четные порядковые номера и являющихся нечетными числами.

Question

Информатика

Диана

30 октября, 01:50

2. Дан массив из N элементов. Определить количество элементов, имеющих четные порядковые номера и являющихся нечетными числами.

+1

Ответы (1)

Знаете ответ?

Сергейка · Answer 1

Var a:array[1 ... 1000] of longint;

n, i, k: longint;

begin

k:=0

readln (n) ;

for i:=1 to n do begin

readln (a[i]) ;

if (i mod 2 = 0) and (a[i] mod 2 = 1) then k:=k+1;

end;

writeln (k) ;

end.