Program _1;
var k1,k2,g: integer;
p,s: real;
begin
readln (k1,k2);
g:= SQRT((k1*k1)+(k2*k2));
s:= (1/2)*(k1*k2);
p:= k1+k2+g;
writeln ('s=',s,' p=',p);
end.