Turbo Pascal 19

Модульное программирование

1. Даны два натуральных числа. Определить, равны ли их цифровые корни (если сложить все цифры числа, затем - все цифры полученной суммы, и повторять это до тех пор, пока не получится однозначное число, то такое однозначное число называется цифровым корнем числа). Реализовать функцию вычисления цифрового корня натурального числа.
2. Дана строка, выяснить является ли она палиндромом («перевертышем»). Для решения задачи реализовать функцию получения обратной строки из заданной.