program xxx;
uses CRT;
var
a, c, h, s:real;
n:integer;
begin
read(n);

if (n=1) then
begin
readln(a);
s:=a*a/2;
c:=sqrt(a*a+a*a);
h:=2*s/c;
write('c=',c,' h=',h,' s=',s);
end;

if (n=2) then
begin
readln(c);
a:=c/sqrt(2);
s:=a*a/2;
h:=2*s/c;
write('a=',a,' h=',h,' s=',s);
end;

if (n=3) then
begin
readln(h);
c:=2*h;
a:=c/sqrt(2);
s:=h*c/2;
write('a=',a,' c=',c,' s=',s);
end;

if (n=4) then
begin
readln(s);
a:=sqrt(2*s);
c:=sqrt(a*a+a*a);
h:=2*s/c;
write('a=',a,' c=',c,' h=',h);
end;

end.