program kiem_tra;
uses crt;
var a,b,c:integer;
begin
clrscr;
write('Nhap so do canh thu nhat: '); readln(a);
write('Nhap so do canh thu hai: '); readln(b);
write('Nhap so do canh thu ba: '); readln(c);
if (a+b>c) and (a+c>b) and (b+c>a) then write('Phai')
else write('Khong phai');
readln;
end.