Viết chương trình nhập 3 số từ bàn phím , kiểm tra xem 3 số đó có phải là 3 cạnh của tam giác không?

0 bình luận về “Viết chương trình nhập 3 số từ bàn phím , kiểm tra xem 3 số đó có phải là 3 cạnh của tam giác không?”

1. Program Ba_canh_tam_giac;

   uses crt;

   var a,b,c:real;

   begin

   clrscr;

   writeln(‘Nhap ba so a,b,c:’); readln(a,b,c);

   If(a+b>c) and (b+c>a) and (a+c>b) then

   writeln(‘a, b va c la 3 canh cua mot tam giac!’);

   else writeln(‘a, b va c khong la 3 canh cua mot tam giac!’);

   readln

   end.

   Bình luận

2. program az;

   uses Crt;

   var a,b,c : longint;

   begin

   clrscr;

   Write(‘nhap ba so a,b,c : ‘); readln(a,b,c);

   If (a + b > c) and (b + c > a) and (c + a > b) and (a > 0) and (b > 0) and (c > 0) then Write(‘3 canh cua tam giac ‘) else Write(‘Khong la 3 canh tam giac ‘);

   readln

   end.

   Bình luận