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

var a, b, c, d, e, f, final : integer;beginwrite('введите 6 чисел через пробел: ');readln(a, b, c, d, e, f);final := (a + b + c + d + e+ f) / 6;writeln('среднее арифметическое равно , final);end.