結果

問題 No.67 よくある棒を切る問題 (1)
ユーザー %20%20
提出日時 2017-09-29 05:50:08
言語 Perl
(5.38.2)
結果
TLE  
(最新)
AC  
(最初)
実行時間 -
コード長 84 bytes
コンパイル時間 1,256 ms
コンパイル使用メモリ 5,888 KB
実行使用メモリ 72,256 KB
最終ジャッジ日時 2024-11-15 19:01:45
合計ジャッジ時間 148,179 ms
ジャッジサーバーID
（参考情報） 		judge1 / judge3
このコードへのチャレンジ
（要ログイン）

テストケース

テストケース表示
入力 結果 実行時間
実行使用メモリ
testcase_00 TLE -
testcase_01 AC 9 ms
13,764 KB
testcase_02 AC 4,198 ms
65,396 KB
testcase_03 TLE -
testcase_04 TLE -
testcase_05 TLE -
testcase_06 TLE -
testcase_07 TLE -
testcase_08 TLE -
testcase_09 TLE -
testcase_10 TLE -
testcase_11 TLE -
testcase_12 TLE -
testcase_13 TLE -
testcase_14 TLE -
testcase_15 TLE -
testcase_16 TLE -
testcase_17 TLE -
testcase_18 TLE -
testcase_19 TLE -
testcase_20 TLE -
testcase_21 TLE -
testcase_22 TLE -
testcase_23 TLE -
testcase_24 AC 8 ms
6,816 KB
testcase_25 AC 227 ms
7,296 KB
testcase_26 AC 88 ms
6,820 KB
testcase_27 AC 63 ms
6,816 KB
testcase_28 AC 1,857 ms
13,744 KB
testcase_29 AC 904 ms
10,116 KB
testcase_30 AC 235 ms
63,104 KB
権限があれば一括ダウンロードができます
コンパイルメッセージ
Main.pl syntax OK

ソースコード

diff # 

<>;@L=glob<>;$-=<>;map{$\+=$t=2**-$_;$%=0;$%+=$_/$\for@L;$\-=$%<$-&&$t}-30..30;print
0