Вычислите дробную часть среднего геометрического трех заданных вещественных чисел.PASCAL ABC
Вычислите дробную часть среднего геометрического трех заданных вещественных чисел.PASCAL ABC
Гость
Ответ(ы) на вопрос:
ГостьVar
a,b,c : Real;
Begin
Readln(a,b,c);
Writeln(Frac(exp((1/3)*ln(a*b*c))));
end.
Не нашли ответ?
Похожие вопросы