Регистрация Вход
Українська література 5 - 9 классы Tholore
Решено

Составить программу, которая вычисляет сумму вводимых с клавиатуры целых чисел до ввода отрицательного числа и выводит на экран значение вычисленной суммы.

31
ОТВЕТЫ
Var a,b,s:integer; 
begin 
s:=0; 
repeat  
readln(a); 
s:=s+a;   
until alt;0; 
writeln(s); 
end.
5
Отв. дан
Для написания вопросов и ответов необходимо зарегистрироваться на сайте