Pātuhitia tēnei: Turbo Pascal: a problem-solving approach