nhập ba số a b c bất kì hãy kiểm tra xem ba số đó có là độ dài ba cạnh của một tam giác hay không thông báo lên màn hình thỏa mãn hay không thỏa mãn với các trường hợp tương ứng
2 câu trả lời
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 (a+c>b) and (b+c>a) 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.