($v,$d)=glob<>;
if($d==1){
	print+(1x$v,$/)x$v;
}else{
	print 1x$v.$/,(1,0 x($v-1),$/)x($v-1);
}