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

после k:=0 должна быть точка с запятой, т.е k:=0;

var a:array[1..1000] of longint;n, i, k: longint;begink:=0readln(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.