Написать прогрумму в паскале)) дано гипотенуза и катет прямоугольноо треуольника. Найдите его площадь и второй катет.
Var a,b,c,s:real; begin read(a,c); b:=sqrt(c*c-a*a); s:=a*b/2; writeln('b=',b,' s=',s); end.