Mador
7 год назад
Найти сумму 4 чисел паскаль
ОТВЕТЫ
Pakakak
Jul 13, 2019
Var
a,b,c,d, sum: integer;
begin
write(Введите через пробел 4 числа: );
readln(a,b,c,d);
sum:=a+b+c+d;
writeln(Сумма: ,sum);
end.
a,b,c,d, sum: integer;
begin
write(Введите через пробел 4 числа: );
readln(a,b,c,d);
sum:=a+b+c+d;
writeln(Сумма: ,sum);
end.
65
Смежные вопросы:
