Даны два неотрицательных числа a и b. найдти их среднее геометрическое, т. е квадратный корень из их произведения: Sgrt (a*b)

Question

Информатика

Михай

17 июля, 16:51

Даны два неотрицательных числа a и b. найдти их среднее геометрическое, т. е квадратный корень из их произведения: Sgrt (a*b)

+5

Ответы (1)

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

Петюня · Answer 1

Var a, b : real;

begin

Write ('Введите 2 числа а и b') ; ReadLn (a, b) ;

Write ('Среднее геометрическое чисел ', a, ' и ', b,' = ', sqrt (a*b)) ;

end.