Question

de elaborat un program pascal care sa calculeze lungimea catetei

Answer 1

Răspuns:

var  

  i,c1,c2:real;

begin

     write('Lungimea ipotenuzei=');

     read(i);

     write('Lungimea 1 catete=');

     read(c1);

     c2:=sqrt(sqr(i)-sqr(c1));

     writeln('Lungimea catetei 2 este=',c2);    

end.