В одномерном массиве подсчитать количество пар стоящих рядом нечетных элементов.
Program blabla; const N = 100; var i, k: integer; a: array [1..N] of integer; begin k:=0; readln(a); for i:=1 to N do if (a[i] mod 2 >< 0) and (a[i-1] mod 2 >< 0) then k:= k+1; writeln(k); end.
спасибо!