очень бы хотелось получить вариант решения такой задачи(использование рекурсии ОБЯЗАТЕЛЬНО):
Для каждого положительного целого числа N будем рассматривать всевозможные его представления в виде суммы одного или нескольких слагаемых. найти все такие представления данного числа.
Например, для 4 таких представлений будет 5: 4, 3+1, 2+2, 2+1+1, 1+1+1+1
Поиском не пользовался, конечно... Потому что вот тут: http://forum.pascal.net.ru/index.php?s=&showtopic=6327&view=findpost&p=47388 приводилось возможное решение...
я пользовался! и где здесь рекурсия?
procedure find(num,k,len: smallint);
var i: smallint;
begin
...
else begin
for i:=1 to k do
if num-i>=0 then begin
c[len]:=i;
find(num-i,i,len+1); { <--- Это что по-твоему ??? }
end;
end;
end;
дада, я уже все сделал, извините, ничего не соображаю спустя день подготовки )))