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

readIntArray ()
|> fun [| d; n |] ->
    Seq.initInfinite id
    |> Seq.filter (fun x -> x % (pown 100 d) = 0)
    |> Seq.skip n
    |> Seq.head
    |> printfn "%d"
