結果

問題 No.476 正しくない平均
ユーザー ichibanshibori
提出日時 2017-01-27 22:26:21
言語 F#
(4.5)
結果
AC  
実行時間 48 ms
コード長 316 Byte
コンパイル時間 4,292 ms
使用メモリ 21,912 KB
最終ジャッジ日時 2020-01-14 10:01:22

テストケース

テストケース表示
入力 結果 実行時間
使用メモリ
0_sample1.txt AC 44 ms
21,700 KB
0_sample2.txt AC 48 ms
21,648 KB
0_sample3.txt AC 44 ms
21,776 KB
1_test1_0.txt AC 44 ms
21,792 KB
1_test1_1.txt AC 44 ms
21,852 KB
1_test1_2.txt AC 40 ms
21,728 KB
1_test1_3.txt AC 40 ms
21,700 KB
1_test2_0.txt AC 44 ms
21,660 KB
1_test2_1.txt AC 48 ms
21,876 KB
1_test2_2.txt AC 44 ms
21,744 KB
1_test3_0.txt AC 44 ms
21,880 KB
1_test3_1.txt AC 40 ms
21,652 KB
1_test3_2.txt AC 40 ms
21,864 KB
2_test1_0.txt AC 44 ms
21,756 KB
2_test1_1.txt AC 44 ms
21,776 KB
2_test2_0.txt AC 44 ms
21,648 KB
2_test3_0.txt AC 44 ms
21,896 KB
2_test3_1.txt AC 44 ms
21,888 KB
2_test4_0.txt AC 44 ms
21,800 KB
2_test5_0.txt AC 44 ms
21,696 KB
gen_case1.txt AC 44 ms
21,868 KB
gen_case2.txt AC 44 ms
21,872 KB
gen_case3.txt AC 44 ms
21,784 KB
gen_case4.txt AC 48 ms
21,824 KB
gen_case5.txt AC 44 ms
21,756 KB
gen_case6.txt AC 44 ms
21,708 KB
gen_case7.txt AC 48 ms
21,716 KB
gen_case8.txt AC 44 ms
21,912 KB
system_test1.txt AC 44 ms
21,792 KB
テストケース一括ダウンロード
コンパイルメッセージ
Microsoft (R) F# Compiler version 10.2.3 for F# 4.5
Copyright (c) Microsoft Corporation. All Rights Reserved.

ソースコード

diff #
let () =
    let _, a = stdin.ReadLine().Split()
               |> Array.map decimal
               |> fun arr -> arr.[0], arr.[1]
    let avg = stdin.ReadLine().Split()
              |> Array.map decimal
              |> Array.average

    a = avg
    |> function | true -> "YES" | false -> "NO"
    |> printfn "%s"
0