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

Var a, b, c:integer;
begin
read(a,b,c);
writeln(a+b+c);//сумма
writeln((a+b+c)/3);//ср. арифметическое
end.