Для программы нужно знать точную дату, для определения полных лет человеку. (Не консоль, а Emabarcadero)
http://docwiki.embarcadero.com/Libraries/Sydney/en/System.DateUtils.Today --- Хотя бы доки их смотрел что ли