là 3 cạnh của tg thường:
uses crt;
var a,b,c:longint;
begin
clrscr;
readln(a,b,c);
if (a+b>c) and (b+c>a) and (a+c>b) then write('a,b,c la tg thuong')
else write('no');
readln
end.
là 3 cạnh của tam giác cân:
uses crt;
var a,b,c:longint;
begin
clrscr;
readln(a,b,c);
if (a=b) and (b=c) and (a=c) then write('a,b,c la tam giac can')
else write('no');
readln
end.
la 3 cạnh của tg đều:
uses crt;
var a,b,c:longint;
begin
clrscr;
readln(a,b,c);
if (a=b=c) and (b=c=a) and (a=c=b) then write('a,b,c la tam giac deu')
else write('no');
readln
end.
