DELPHI / PASCAL

    program p;
    {$APPTYPE CONSOLE}
    var a,b:integer;
    begin
         readln(a,b);
         writeln('the hypotenuse of this right triangle is',sqrt(b*b+a*a):2:3);
    end.