очень бы хотелось получить вариант решения такой задачи(использование рекурсии ОБЯЗАТЕЛЬНО):

Для каждого положительного целого числа N будем рассматривать всевозможные его представления в виде суммы одного или нескольких слагаемых. найти все такие представления данного числа.
Например, для 4 таких представлений будет 5: 4, 3+1, 2+2, 2+1+1, 1+1+1+1

Поиском не пользовался, конечно... Потому что вот тут: разложение числа приводилось возможное решение...

я пользовался! и где здесь рекурсия?

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;

дада, я уже все сделал, извините, ничего не соображаю спустя день подготовки )))