Cho biết độ dài cạnh huyền và cạnh góc vuông. Tính cạnh góc vuông còn lại

0 bình luận về “Cho biết độ dài cạnh huyền và cạnh góc vuông. Tính cạnh góc vuông còn lại”

1. program phuongt;

   uses crt;

     var a, b, c: real;

   begin

            clrscr;

            write(‘Nhap canh huyen: ‘); readln(a);

            write(‘Nhap canh goc vuong: ‘); readln(b);

            c:=a*a-b*b;

            write(‘Canh goc vuong con lai la: ‘, sqrt(c));

            readln

   end.

   Bình luận

2. program canhgocvuong;

   uses crt;

   var ch,cgv1,cgv2:real;

   begin

        clrscr;

        write(‘Nhap do dai canh huyen: ‘);   readln(ch);

        write(‘Nhap do dai canh huyen thu nhat: ‘);   readln(cgv1);

        cgv2:=sqrt(sqr(ch)-sqr(cgv1));

        write(‘Canh goc vuong con lai la: ‘,cgv2:2);

        readln;

   end.

   Bình luận