Begin9. Даны два неотрицательных числа a и b. Найти их среднее геометрическое, то есть квадратный корень из их произведения: .
var a, b, sr: real;
begin
  write('Введите два числа ->');
  readln(a, b);
  sr:=sqrt(a*b);
  writeln('Среднее геометрическое = ', sr:6:2);
end.