Помогите с задачкой в Delphi решить с компонентом Case of

Оператор варианта

Дано натуральное число п (1 < п < 1188), определяющее возраст человека (в месяцах) . Выразить возраст в годах и месяцах, например, 21 год
10 месяцев, 52 года 1 месяц, 46 лет ровно и т. п.