Чуть-чуть изменил, ты вводишь сначала число с клавиатуры, это N. В твоем случае - 4. Затем пишешь четыре целых числа. Он тебе выдаст количество нечетных.
var a,n,i,k:integer; begin k:=0; read(n); while i<n do begin read(a); if (a mod 2=1) then k:=k+1; i:=i+1; end; writeln(k); end.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
