Viết chương trình nhập vào ba cạnh của một tam giác (a,b,c) kiểm tra và thông báo ra màn hình: a,b,c có phải là một cạnh của tam giác không?
Viết chương trình nhập vào ba cạnh của một tam giác (a,b,c) kiểm tra và thông báo ra màn hình: a,b,c có phải là một cạnh của tam giác không?
Nek
Program NN;
Uses crt;
Var a,b,c: real;
Begin
Clrscr;
Write(‘Nhap do dai 3 canh: ‘); Readln(a,b,c);
If (a+b>c) and (a+c>b) and (b+c>a) then Write(‘YES’)
Else Write(‘NO’);
Readln
End.