С клавиатуры вводятся N чисел. Определить кол-во нечетных и вывести на экран.
Паскаль

Спасибо

Ну вообще, не то

Хотя не, работает. Просто нужно дописать чутка

И тип longint должен быть, ибо число может быть большим

Вряд ли кому-то взбредёт в голову вводить такие большие числа ;)

Program test;vara,b:integer;beginb:=0;repeatreadln(a);if a mod 2<>0 then b:b+1;until a=0;writeln(b);end.Если пишешь в Turbo Pascal перед " end." добавь строчку "readln;". Писал на скорую руку, проверь, перед тем, как сдавать учителю ;)Чтобы вывел результат - нужно ввести с клавиатуры 0.