Функции. Pascal.

[meta]

Помогите с задачкой. Вот как она звучит:

Разработать функцию, которая из заданного беззнакового целого числа формирует новое число путем изменения каждой цифры на соответствующую меньшую. Параметр функции - число, цифры которого надо уменьшить. Есть текстовый файл (его нужно предварительно создать средствами одного из текстовых редакторов), в котором записана последовательность натуральных чисел. На основе разработанной функции поменять цифры каждого из этих чисел. Результат напечатать в форме таблицы.

Помогите написать функцию. и как выводить результаты в виде таблички?

[R_G]

icq 362306570. пиши, помогу.