{
	o=[1];
	q=vector(250);
	print ("0 1");
	for (n=1, #q,
		if (n<=2, q[n]=1, q[n]=q[n-q[n-1]]+q[n-q[n-2]]);
		while (#o<q[n],
			o=concat(o, vector(#o));
		);
		o[q[n]]++;

		print (n, " ", (n+1)!/prod(k=1, #o, o[k]!));
	);
}

quit