let n = stdin.ReadLine () |> int let a = stdin.ReadLine().Split " " |> Array.map int if a.Length > 2 then [| for i in 0..a.Length-2 -> min a.[i] a.[i+1] |> int64 |] |> Array.reduce (fun prev x -> prev * x % 998244353L) else (Array.min a |> int64) % 998244353L |> printfn "%d"