Количество слагаемых числами 1, 2, 3

Posted by obzor under Delphi

Задача: Дано число n, отобразить количество его всевозможных слагаемых числами 1, 2, 3.

Аватар

Рекуррентная зависимость и, соответственно, рекурсия, типа такой, делфийской:

const a: array[1..3] of Integer = (1,2,3);

function f(i,j: Integer): Integer;
begin
  if (i<0) or (j<1) then Result:=0
  else if i=0 then Result:=1
  else Result:=f(i-a[j],j)+f(i,j-1);
end;

Обращение: f(n,3)
Для достаточно больших n может завалить стек.

тема на форуме

Случайные статьи

• WMI. Wладение Mагической Iнформацией. часть 1
• Если бы языки программирования…
• Перевод из строкового числа в численный
• C/C++ вырезать часть данных с файла
• Рассылка. Выпуск 104
• Поиск по столбцу 1-ого не нулевого значения (формулой в Microsoft Office Excel)
• Сохранение столбца в секции ini файла
• Определить размер форма в миллиметрах
• При нажатии кнопки открыть сайт
• Метод дихотомического деления — самый простой метод нахождения корней в C++