Рекурсия

Самостоятельные задания

1. Создайте предикат, вычисляющий неотрицательную степень целого числа.
2. Создайте предикат, вычисляющий по натуральному числу N сумму чисел от 1 до N.
3. Создайте предикат, вычисляющий по натуральному числу N сумму нечетных чисел, не превосходящих N.
4. Создайте предикат, вычисляющий наибольший общий делитель двух натуральных чисел.
5. Создайте предикат, вычисляющий наименьшее общее кратное двух натуральных чисел.
6. Реализуйте, используя рекурсию и отсечение, цикл с постусловием (типа repeat <оператор> until <условие> ).
7. Реализуйте, используя рекурсию и отсечение, цикл со счетчиком (типа for i:=1 to N do <оператор> )
8. Реализуйте, используя рекурсию и отсечение, цикл со счетчиком (типа for i:=1 downto N do <оператор> )