Пожалуста составьте программу которая находит сумму 2 чисел на Паскале. И чтобы программа повторялась каждый раз без перезапуска (цикл)
Answers & Comments
roman1020
Program calc; var a, b, c : real; begin repeat writeln("Введите 2 числа:"); readln(a, b); c := a + b; writeln("Сумма: ", c); until false; end.
Answers & Comments
var
a, b, c : real;
begin
repeat
writeln("Введите 2 числа:");
readln(a, b);
c := a + b;
writeln("Сумма: ", c);
until false;
end.