Ответ: var a,b,c:real;begin  readln(a,b,c);  writeln(‘Сумма ‘,a+b+c,’ Произведение ‘,a*b*c,’ Среднее арифметическое ‘,(a+b+c)/3);end.