Ответы
Ответ дал:
14
program zadacha;
var a,b,c,s,p: integer;
begin
writeln ('Введите три числа');
readln (a,b,c);
s:=a+b+c;
p:=a*b*c;
writeln ('Сумма равна ',s);
writeln ('Произведение равно ',p);
end.
var a,b,c,s,p: integer;
begin
writeln ('Введите три числа');
readln (a,b,c);
s:=a+b+c;
p:=a*b*c;
writeln ('Сумма равна ',s);
writeln ('Произведение равно ',p);
end.
Приложения:
![](https://st.uroker.com/files/757/757a4946b00e257409938cc4b11154b6.jpg)
Вас заинтересует
1 год назад
1 год назад
1 год назад
6 лет назад
7 лет назад