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