(решать в Pascal ABC):
Найти, сумму, произведение и среднее арифметическое 3 целых чисел: a=10, b=25, c=35.​

Katyakat20050904 Katyakat20050904    1   23.04.2020 17:39    1

Ответы
An0441 An0441  24.08.2020 01:50

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.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика