водится положительное число прекратить ввод когда сумма введёных чисел превысит 100
водится положительное число прекратить ввод когда сумма введёных чисел превысит 100
Не можешь разобраться в этой теме?
Обратись за помощью к экспертам
Гарантированные бесплатные доработки в течение 1 года
Быстрое выполнение от 2 часов
Проверка работы на плагиат
Поможем написать учебную работу
var a,s: integer;
begin
readln(a);
s:=a;
while s<=100 do
begin
readln(a);
s:=s+a;
end;
writeln(s);
end.