Question

Написать рекурсивную программу нахождения суммы чисел

Answer 1

===== PascalABC.NET =====

function RS(a: array of integer): integer;

begin

 var n := a.Length;

 Result := a[0];

 if n > 1 then

   Result += RS(a[1:])

end;

begin

 var n := ReadInteger('Число слагаемых:');

 var a := ReadArrInteger('Вводите:', n);

 RS(a).Println

end.

Answer 2

Конечно! Вот пример рекурсивной программы нахождения суммы чисел на языке Python:

pythonCopy code
def recursive_sum(numbers):
    if not numbers:  # базовый случай: если список пустой, возвращаем 0
        return 0
    else:
        return numbers[0] + recursive_sum(numbers[1:])  # рекурсивный случай: суммируем первый элемент списка и рекурсивно вызываем функцию для остальной части списка

# Пример использования:
my_list = [1, 2, 3, 4, 5]
result = recursive_sum(my_list)
print("Сумма чисел:", result)

В этой программе функция recursive_sum принимает список чисел numbers в качестве аргумента. В базовом случае, когда список пустой, функция возвращает 0. В рекурсивном случае, она берет первый элемент списка numbers[0] и добавляет его к результату рекурсивного вызова функции recursive_sum для остальной части списка numbers[1:]. Таким образом, функция рекурсивно суммирует все числа в списке.