Даны два неотрицательных числа a и b. найдти их среднее геометрическое, т.е квадратный корень из их произведения: Sgrt(a*b)
Даны два неотрицательных числа a и b. найдти их среднее геометрическое, т.е квадратный корень из их произведения: Sgrt(a*b)
Гость
Ответ(ы) на вопрос:
Гостьvar a,b :real;
begin
Write('Введите 2 числа а и b'); ReadLn(a,b);
Write('Среднее геометрическое чисел ',a, ' и ',b,' = ',sqrt(a*b));
end.
Не нашли ответ?
Похожие вопросы