PASCAL! Дана последовательность целых чисел признак окончаний которой 0.Найдите сумму всех элементов последовательности.
PASCAL! Дана последовательность целых чисел признак окончаний которой 0.Найдите сумму всех элементов последовательности.
Гость
Ответ(ы) на вопрос:
ГостьПодробное решение, а точнее программа внутри файла
Гость//Блок-схема во вложении.
var
a,s:integer;
begin;
a:=1;
repeat
readln(a);
s:=s+a;
until a=0;
write(s);
end.
Не нашли ответ?
Похожие вопросы