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

Question

Информатика

Полюша

25 марта, 12:37

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

+3

Ответы (1)

Знаете ответ?

Вита · Answer 1

Var a, b, c, d, e, f, final : integer;

begin

write ('введите 6 чисел через пробел: ') ;

readln (a, b, c, d, e, f) ;

final : = (a + b + c + d + e + f) / 6;

writeln ('среднее арифметическое равно, final) ;

end.