Написать программу на языке Паскаль.
Введите 4 числа и выведите их сумму и среднее арифметическое. Правильно определите тип переменных.​

var a, b, c,d:integer;s:real;

begin

writeln('введите 4 числа') ;

readln(a,b,c,d);

writeln('Сумма равна ', a+b+c+d);

s:= (a+b+c+d)/4;

writeln('Среднее арифметическое: ', s);

end.

Объяснение: