var
cha, con: integer;
begin
write('Tuoi con: '); readln(con);
write('Tuoi cha: '); readln(cha);
if (con<0) or (con*2>=cha) or (con+25>cha) then
begin
write('Tuoi cha va tuoi con khong dung voi de bai'); readln;
exit;
end;
write('Sau ',cha-con*2,' nam nua thi tuoi cha gap doi tuoi con'); readln;
end.