Максим
5 год назад
как написать программу которая вводит числа до тех пор, пока не будет введён 0. И подсчитайте их количество чисел!
ОТВЕТЫ
Gordon Michael
Oct 24, 2020
begin
var ans:=1;
while (ReadInteger('Введите очередное число:') <> 0)do
inc(ans);
Writeln('Всего чисел:', ans);
end.
887
