結果

問題 No.39 桁の数字を入れ替え
ユーザー tails
提出日時 2016-05-19 13:31:18
言語 Perl
(5.40.0)
結果
WA  
実行時間 -
コード長 86 bytes
コンパイル時間 165 ms
コンパイル使用メモリ 5,504 KB
実行使用メモリ 5,376 KB
最終ジャッジ日時 2024-10-06 06:06:56
合計ジャッジ時間 1,025 ms
ジャッジサーバーID
(参考情報)
judge2 / judge4
このコードへのチャレンジ
(要ログイン)
ファイルパターン 結果
other AC * 10 WA * 9
権限があれば一括ダウンロードができます
コンパイルメッセージ
Main.pl syntax OK

ソースコード

diff #

$"='';map{@a=@_,@a[$',$_]=@_[$_,$'],$\<"@a"?$\="@a":0for//..$#_}0..(@_=<>=~/./g);print
0