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

Question

Информатика

Христинка

20 ноября, 16:27

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

+4

Ответы (1)

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

Манюха · Answer 1

Var a, b, k:real;

begin

writeln ('Введите число а') ;

readln (a) ;

writeln ('Введите число b') ;

readln (b) ;

k:=sqrt (a*b) ;

writeln ('Среднее геометрическое равняется ', k) ;

end.