Напишите пожалуйста программу в pascal,которая запрашивает у пользователя числа и считает их сумму до тех пор пока пользователь не введёт число 44.После того программа должна прекратить запрашивать числа и вывести пользователю ...
Напишите пожалуйста программу в pascal,которая запрашивает у пользователя числа и считает их сумму до тех пор пока пользователь не введёт число 44.После того программа должна прекратить запрашивать числа и вывести пользователю сумму.
Ответ(ы) на вопрос:
Var
a,b:integer;
Begin
writeln('Не вводите 44');
while b<>44 do
Begin
Writeln('Число, пожалуйста');
a:=a+b;
readln(b);
End;
Write(a,' - это сумма тех чисел, которые вы вводили');
End.
Не нашли ответ?
Похожие вопросы