12 lines
201 B
Text
12 lines
201 B
Text
c(n,k,r,d)={
|
|
if(d==k,
|
|
for(i=2,k+1,
|
|
print1(r[i]" "));
|
|
print
|
|
,
|
|
for(i=r[d+1]+1,n,
|
|
r[d+2]=i;
|
|
c(n,k,r,d+1)));
|
|
}
|
|
|
|
c(5,3,vector(5,i,i-1),0)
|