program kolmnurk; var a, b, c: real; begin writeln('a='); readln(a); writeln('c='); readln(c); if (c>a) then begin b:=sqrt(sqr(c)-sqr(a)); writeln('b=', b); end; end.