let readIntArray () =
    stdin.ReadLine().Split(" ") |> Array.map int

readIntArray ()
|> fun [| d; n |] ->
    Seq.initInfinite ((+) 1)
    |> Seq.filter (fun x -> if d = 0 then x % 100 <> 0 else x % (pown 100 d) = 0)
    |> Seq.skip (n - 1)
    |> Seq.head
    |> printfn "%d"
