// 人数 let n = stdin.ReadLine() |> int // データ let xs = stdin.ReadLine().Split() |> Array.map float // 対象者 let m = stdin.ReadLine() |> int // 平均 let ave = xs |> Array.average // 分散 let variance = xs |> Array.map (fun x -> (x - ave) ** 2.) |> Array.average // 標準偏差 let stdDeviation = variance |> sqrt // 偏差値 if stdDeviation <> 0.0 then 50. + 10. * (xs.[m-1] - ave) / stdDeviation else 50. |> int |> printfn "%d"