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

Question

Информатика

Игоряша

8 февраля, 04:59

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

+3

Ответы (1)

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

Лида · Answer 1

Var a, b : real;

begin

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

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

end.