Самостоятельные задания. 1. Создайте предикат, вычисляющий неотрицательную степень целого числа

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 <оператор>)