Паскаль, составить программу: вводить с клавиатуры числа, пока не будут введен 0. найти количество введенных чисел.

osipovvlavlad osipovvlavlad    3   03.08.2019 15:10    1

Ответы
OLZHAS1808 OLZHAS1808  30.09.2020 12:00
Program kek;var a, i: Integer;begin  repeat    i += 1;    readln(a);  until a = 0;  writeln(i - 1);end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика