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

Question

Информатика

Иоанна

30 ноября, 08:44

Даны три целых числа 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.