(решать в Pascal ABC):
Найти, сумму, произведение и среднее арифметическое 3 целых чисел: a=10, b=25, c=35.
Ответы
Ответ дал:
0
program *название программы*;
var a,b,c,S,P:inreger; Sr:real;
begin
a:=10;
b:=25;
c:=35;
S:=a+b+c;
P:=a*b*c;
Sr:=S/3;
Writeln('Сумма=',S,', произведение=',P,', среднее арифметическое=',Sr);
end.
Вас заинтересует
4 месяца назад
4 месяца назад
5 месяцев назад
5 месяцев назад
2 года назад
7 лет назад