>>> pow(2,65000) + pow(2,17111)

				while (p1 < K1) {							
					SOCHET(K, P, p1, i2);		
						
					q=q+1;						
					for(var i = 1; i <=N; i++) {MR[q][i]=F[i];}						
					// признак ФМР3						
					MR[q][0]=16;						
					for(var k2 = 1; k2 <=K; k2++) {						
						if (k2 == 1) {					
							MR[q][ MCHET[k2][1] ]=F[ MCHET[k2][2] ];				
							MR[q][ MCHET[k2][2] ]=F[ MCHET[k2][1] ];				
							MR[q][ MCHET[k2][3] ]=F[ MCHET[k2][4] ];				
							MR[q][ MCHET[k2][4] ]=F[ MCHET[k2][3] ];				
						}					
					}						

// K – количество чисел (объектов).							
var P = new Array(K+1);							
for(var i = 1; i <= K; i++) P[i]=1;							
var M;							
while(SOCHETM(K, P, M)) {							
        // печать сочетания							
	for(var i = 1; i <= K; i++) print(P[i]);						
}							
							
function SOCHETM(K, P, M)  {							
	for(var i1 = 1; i1 <=K; i1++) {						
		P[i1]=P[i1]+1;					
		if (P[i1] != (M + 1)) break; 				// Выход из цикла если P[i1] != M+1	
		P[i1] = 1;					
	}						
	return i1 <= K;						
}	

function main {							
	var N1=13;						
	var P = new Array(N1+2);						
	for(var i = 1; i <= N1; i++) P[i]=1;						
	P[3]=0;						
	P[9]=0;						
	p[11]=0;						
	var M=8;						
	var M1=2;						
	while(SOCHET3(N1, P, M1)) {						
		for(var i = 1; i <= N1; i++) print(P[i]);					
	}						
}							
							
function SOCHETM(K, P, M)  {							
	for(i1 = 1; i1 <=K; i1++) {						
		if (P[i1] >0) {					
			P[i1]=P[i1]+1;				
			if (P[i1] != (M + 1)) break; 			// Выход из цикла если P[i1] != M+1	
			P[i1] = 1;				
		}					
	}						
	return i1 <= K;						
}