Даны два неотрицательныхчисла a и b .Найдите их среднеегеометрическое , т.еквадратный корень из ихпроизведения : Sqrt(a*b).Исходные данные :A=5.00 b=17.00 срочно пожалуйста помогите,пожааалуйста очень буду благодарна

Var a,b:integer;
begin
readln(a,b);
writeln(sqrt(a*b));
end.