uses crt;
var
a,b,c,s:real;
begin
 clrscr;
 writeln('введите катеты:');
 readln(a,b);
 c:=sqrt(a*a+b*b);
 s:=0.5*a*b;
 writeln('c=',c,';','S=',s);
end.