с клавиатуры вводят последовательность чисел до тех пор пока не будет введено число 3. Требуется найти сумму введенных чисел.(паскаль) помогите пожалуйста!!!
Ответы на вопрос
Ответил archery
0
var
s, n: real;
begin
s := 0;
n := 0;
repeat
s := s + n;
readln(n);
until n = 3;
writeln(s);
end.
s, n: real;
begin
s := 0;
n := 0;
repeat
s := s + n;
readln(n);
until n = 3;
writeln(s);
end.
Новые вопросы
Русский язык,
2 года назад
Информатика,
2 года назад
Математика,
9 лет назад
Информатика,
9 лет назад