Написать программу в Паскале, которая бы при вводе даты рождения...

Написать программу в Паскале, которая бы при вводе даты рождения пользователем выводила бы его восточный и западный гороскопы с краткой характеристикой и рисунками. При этом дату рождения пользователь мог бы вводить в любом формате.
Без функции pos(), copy(), ord(), length(), strtoint(), inc(), integer(), byte(), sscanf.