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

Question

Информатика

Игоряша

16 февраля, 16:47

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

+4

Ответы (1)

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

Лида · Answer 1

Var a, b : real;

begin

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

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

end.