// 人数 let n = stdin.ReadLine() |> int64 // データ let xs = stdin.ReadLine().Split() |> Array.map int64 // 対象者 let m = stdin.ReadLine() |> int let sum = xs |> Array.sum let y = xs |> Array.map (fun x -> (x*n - sum) * (x*n - sum)) |> Array.sum |> float |> fun x -> x / float n |> sqrt // 偏差値 if xs.[m-1]*n <> sum then 50.0 + 10.0 * float (xs.[m-1]*n - sum) / y else 50.0 |> int |> printfn "%d"