Помогите пожалуйста с задачей. Написать программу ** Pascal. Даны три действительных...

Question

Помогите пожалуйста с задачей.
Написать программу на Pascal.
Даны три действительных положительных числа. Найдите среднее геометрическое этих чисел.

Answer 1

Var a,b,c : Real;
Begin
  Readln(a,b,c);
  Writeln(Power(a*b*c,1/3));
end.