<>; @_=(_,0,0,0,1,1,2,4); $_[$_]=(2*$_[$_-1]-$_[$_-5])%17for 8..1e6; for(<>){ print$_[$_],$/ }