for i=0to 99do let(!)x=i mod x/(x-1)in Printf.printf"%d
"[|min(i/9+1)2;4;8|].(!3+ !5)done