(Q:=S:=1)to:1e3do:[:i|S\\Q*(S:=S*Q*Q)\\(Q:=Q+2)<1or:[stdout<<(Q- 2)<<$,<<Q;nl]]