m:-0/1.
I/N:-(N mod 3<1,!;writeln(I)),J is I+1,M is N*4-N*2//J,J<1e3,J/M.