($n,$k)=glob<>; print"1 "x($n-2),$k+1,$",$k*($n+$k-1);