Предмет: Информатика,
автор: shalyapinalarisa00
хелпаните плиз прошу помогите
Приложения:

Ответы
Автор ответа:
1
При вводе чисел из задания мы получим число 5.
var
x,s : integer;
begin
s:=0;
repeat
readln(x);
s := s + x;
until x = 0;
write(s);
end.
shalyapinalarisa00:
Боже мой, спасибо большое.
Интересные вопросы
Предмет: Русский язык,
автор: МаркМонашов
Предмет: Окружающий мир,
автор: raimov78
Предмет: Русский язык,
автор: kirilinaleksey
Предмет: Математика,
автор: Богиня5671
Предмет: Українська мова,
автор: lixolsherstp6kc3j