Viết chương trình kiểm tra 3 cạnh có tạo thành tam giác không? * giúp mình với mình cần gấp
2 câu trả lời
uses crt;
var a,b,c:integer;
begin
clrscr;
write('nhap a,b,c: ');readln(a,b,c);
if (a+b>c) and (a+c>b) and (b+c>a) then writeln('tao thanh tam giac')
else writeln('khong tao thanh tam giac');
readln;
end.
Uses crt;
Var
a,b,c: integer;
Begin
clrscr;
write('Nhap 3 canh: '); read(a,b,c);
if (a+b>c) and (b+c>a) and (a+c>b)
then writeln('3 canh tren co the tao thanh mot tam giac')
else writeln('3 canh tren khong the tao thanh mot tam giac');
End.