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