program canhtamgiac;
uses crt;
var a,b,c : integer;
begin
clrscr;
write(nhap so a= ');readln(a);
write(nhap so b= ');readln(b);
if a+b>c and a+c>b andb+c>a then
write('a,b,c la canh tam giac') esle
write('a,b,c khong phai canh tam giac');
readln;
end.