Даны три целых числа a, b, c. Найдите среднее арифметическое их квадратов

Question

Информатика

Рустя

11 августа, 19:25

Даны три целых числа a, b, c. Найдите среднее арифметическое их квадратов

+4

Ответы (1)

Знаете ответ на вопрос?

Мир · Answer 1

Var a, b, c : integer;

begin

writeln ('введите число A') ;

readln (A) ;

writeln ('введите число B') ;

readln (B) ;

writeln ('введите число C') ;

readln (C) ;

S: = (sqr (a) + sqr (b) + sqr (c)) / 3;

writeln (S) ;

end.