Написать программу, в которой для прямоугольного треугольника с катетом b и гипотенузой c вычисляется значение катета a
Program n1; var a,b,c: real; begin readln(b,c); a:=sqrt(c*c-b*b); writeln(a); end.