Создайте рекурсивную функцию на языке Паскаль, которая вычисляет сумму целых чисел m и n, используя только операции

Название: Рекурсивная функция на языке Паскаль для вычисления суммы целых чисел

Описание: Для создания рекурсивной функции на языке Паскаль, которая вычисляет сумму целых чисел m и n, используя только операции прибавления и вычитания единицы, мы будем использовать следующий подход:

1. Если m равно нулю, то возвращаем значение n.
2. Если n равно нулю, то возвращаем значение m.
3. В противном случае вызываем функцию рекурсивно, уменьшая значение m на единицу и увеличивая значение n на единицу. Затем складываем результаты этих двух вызовов и возвращаем полученную сумму.

Вот пример рекурсивной функции на языке Паскаль, реализующей эту логику:

pascal

function sum(m, n: integer): integer;

begin

  if m = 0 then

    sum := n

  else if n = 0 then

    sum := m

  else

    sum := sum(m - 1, n + 1);

end;

Например: Допустим, мы хотим вычислить сумму чисел 3 и 5. Вызовем функцию `sum(3, 5)`. Результат будет равен 8.

Совет: При работе с рекурсивными функциями важно следить за базовыми случаями, в которых мы останавливаемся и возвращаем определенные значения. Кроме того, убедитесь, что аргументы функции обновляются каждый раз, когда функция вызывает саму себя, чтобы избежать зацикливания.

Задача для проверки: Напишите рекурсивную функцию на языке Паскаль для вычисления суммы чисел 1 до n, используя только операции прибавления и вычитания единицы.