Ввести с клавиатуры три целых числа, найти их сумму, произведение и среднее арифметическое в pascal ABC
Пример:
Введите три целых числа :
5 7 8
5+7+8=20
5*7*8=280
(5+7+8)/3=6,667

program HelloWorld;varcount, sum, mult, a : integer;average : real;begincount:=3;sum:=0;mult:=1;while count>0 do begin readln(a); count:=count-1; sum:=sum+a; mult:=mult*a;end;average:=sum/3;writeln('Сумма - ',sum);writeln('Произведение - ',mult);writeln('Среднее арифметическое - ',average);end.