Регистрация
murat200202
01.05.2022 01:04
Информатика
Есть ответ 👍

Склавиатуры вводится последовательность чисел, 0 конец последовательности. посчитать сколько введено четных чисел. нужно составить программу для паскаль

260
453
Посмотреть ответы 2

Ответы на вопрос:

Tigor111
Tigor111
4,4(9 оценок)
Var x,y: integer; begin   repeat     readln(x);     y : = y + 1 - (x mod 2);   until x = 0;   writeln(y); end.
14andrew
14andrew
4,8(52 оценок)
Количество отрицательных элементов массива.ответ: 4

Популярно: Информатика