Ресурс:
Практическое программирование.Решение типовых задач Pascal 7.0