viết chương trình nhập vào 3 số thực a,b,c kiểm tra xem a,b,c có phải độ dài 3 cạnh cuả 1 tam giac hay không?

0 bình luận về “viết chương trình nhập vào 3 số thực a,b,c kiểm tra xem a,b,c có phải độ dài 3 cạnh cuả 1 tam giac hay không?”

1. Program BTT;
   Uses crt;
   Var a,b,c: extended;
   Begin
           Clrscr;
           Write(‘Nhap a, b, c: ‘); Readln(a,b,c);
           If (a+b>c) and (b+c>a) and (a+c>b) then Write(‘Do la do dai 3 canh cua tam giac’)
           Else Write(‘Do khong phai do dai 3 canh cua tam giac’);
           Readln
   End.

   Bình luận

2. var a,b,c: integer;

   begin

   clrscr;

   writeln(‘ nhap lan luot do dai cac canh cua tam giac a,b,c la:’)l;

   readln(a,b,c)

   if (a+b>c) or( b+c>a) or( a+c >b )then write(‘ la do dai 3 canh cua tam giac else write(‘khong phai la do dai 3 canh cua tam giac’);

   readln;

   end.

   Bình luận