var a,b,c:longint;
begin
write('Nhap a: '); readln(a);
write('Nhap b: '); readln(b);
write('Nhap c: '); readln(c);
if (a=b) and (b=c) then write('Tam giac deu') else
if (a=b) or (a=c) or (c=b) then write('Tam giac can') else
write('Khong phai la tam giac deu hay tam giac can');
readln;
end.