結果

問題 No.5001 排他的論理和でランニング
ユーザー %20
提出日時 2018-03-16 23:10:35
言語 Perl
(5.40.0)
結果
AC  
実行時間 362 ms / 1,500 ms
コード長 57 bytes
コンパイル時間 22 ms
実行使用メモリ 32,032 KB
スコア 26,734,226
最終ジャッジ日時 2020-03-12 19:31:38
ジャッジサーバーID
（参考情報） 		judge9 /
純コード判定しない問題か言語
このコードへのチャレンジ
（要ログイン）
ファイルパターン 結果
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