結果

問題 No.5001 排他的論理和でランニング
ユーザー %20%20
提出日時 2018-03-16 22:35:09
言語 Perl
(5.40.0)
結果
AC  
実行時間 356 ms / 1,500 ms
コード長 57 bytes
コンパイル時間 575 ms
実行使用メモリ 32,144 KB
スコア 26,734,226
最終ジャッジ日時 2020-03-12 19:24:10
ジャッジサーバーID
（参考情報） 		judge8 /
純コード判定しない問題か言語
このコードへのチャレンジ
（要ログイン）
ファイルパターン 結果
other AC * 50
権限があれば一括ダウンロードができます
コンパイルメッセージ
Name "main::N" used only once: possible typo at Main.pl line 1.
Main.pl syntax OK

ソースコード

diff # 

($N,$M)=glob<>;
@A=sort{$b-$a}glob<>;
print"@A[0..$M-1]"
0