var a,b,d,o,p : real;
Begin
        ReadLn(a,d);
        //d = sqrt(a*a + b*b) P I T A G O R A
        b := sqrt(d*d - a*a);
        WriteLn('Druga stranica: ',b:0:3);
        If (a>b) Then
                WriteLn('Veca je zadata stranica')
        Else
                WriteLn('Veca je izracunata stranica');
        o := 2*(a+b);
        p := a*b;
        WriteLn('Obim je ',o:0:3,', a povrsina ',p:0:3);
End.