open System
for i in [5; 50; 9000] do printfn "%s" <| Convert.ToString (i, 2)