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

Программа рассчитана на введение чисел до 1000.

program calc;var a,b,c: integer;beginwriteln(\'Введите три целых числа через пробел\');readln(a,b,c);writeln(a,\' + \',b,\' + \',c, \' = \', a + b + c);writeln(a,\' * \',b,\' * \',c, \' = \', a*b*c);writeln(\'(\', a,\' + \',b,\' + \',c, \') / 3 = \', (a + b + c )/3 : 8 : 3)end.