(do((n 22(floor(* n 7/3))))((< 1e8 n))(write n))