let () =
  let a, b = Scanf.scanf "%d %d " (fun a b -> a, b) in
  for i = a to b do
    if i mod 3 = 0 || String.contains (string_of_int i) '3'
    then Printf.printf "%d\n" i
  done