Question

Пожалуйста, срочно!!! Составить программу, которая запрашивает три целых числа и вычисляет сумму этих чисел, среднее арифметическое этих чисел.

Answer 1

var

 a, b, c: integer;

begin

 writeln('Введите три целых числа');

 read(a, b, c);

 writeln('Сумма этих чисел равна ', a + b + c);

 writeln('Среднее арифметическое этих чисел равно ', (a + b + c) / 3);  

end.