Изменения

Пусть <tex>gen(k, l)</tex> {{---}} процедура генерирования, где <tex>a</tex> {{---}} текущее сочетание, <tex>k</tex> {{---}} следующий элемент в сочетании, <tex>l</tex> {{---}} глубина рекурсии.

begin

a[l] = k;