Question

Даны два неотрицательных числа a и b.Найти их средние геометрическое,т.е. квадратный корень из их произведений: Sqrt(a 'b).В abc pascal,begin 9

Answer 1

Var
   a,b:integer;
Begin
  Writeln('Введите а и b через пробел');
  Readln(a,b);
  Writeln(sqrt(a*b));
End.

Answer 2

что писать в вводе данных?

Answer 3

10 20 например

Answer 4

13 7