結果

問題 No.1106 🦉 何事もバランスが大事
ユーザー tailstails
提出日時 2020-07-07 10:59:28
言語 Perl
(5.38.2)
結果
TLE  
(最新)
AC  
(最初)
実行時間 -
コード長 125 bytes
コンパイル時間 562 ms
コンパイル使用メモリ 12,672 KB
実行使用メモリ 14,208 KB
最終ジャッジ日時 2024-09-25 09:54:46
合計ジャッジ時間 128,479 ms
ジャッジサーバーID
(参考情報)
judge5 / judge3
このコードへのチャレンジ
(要ログイン)

テストケース

テストケース表示
入力 結果 実行時間
実行使用メモリ
testcase_00 AC 49 ms
12,800 KB
testcase_01 AC 52 ms
12,672 KB
testcase_02 AC 55 ms
12,672 KB
testcase_03 AC 101 ms
12,800 KB
testcase_04 AC 1,822 ms
13,952 KB
testcase_05 AC 49 ms
12,672 KB
testcase_06 AC 49 ms
12,800 KB
testcase_07 AC 51 ms
12,800 KB
testcase_08 AC 50 ms
12,672 KB
testcase_09 AC 72 ms
12,672 KB
testcase_10 AC 101 ms
12,800 KB
testcase_11 AC 132 ms
12,800 KB
testcase_12 AC 201 ms
13,056 KB
testcase_13 AC 308 ms
12,800 KB
testcase_14 AC 380 ms
13,184 KB
testcase_15 AC 437 ms
12,928 KB
testcase_16 AC 438 ms
13,056 KB
testcase_17 AC 441 ms
13,056 KB
testcase_18 AC 444 ms
12,928 KB
testcase_19 AC 443 ms
12,928 KB
testcase_20 AC 719 ms
13,184 KB
testcase_21 AC 814 ms
13,312 KB
testcase_22 AC 1,036 ms
13,440 KB
testcase_23 AC 1,204 ms
13,440 KB
testcase_24 AC 1,411 ms
13,568 KB
testcase_25 AC 1,680 ms
13,696 KB
testcase_26 AC 1,875 ms
13,952 KB
testcase_27 AC 1,864 ms
13,952 KB
testcase_28 AC 1,888 ms
13,952 KB
testcase_29 AC 1,872 ms
13,952 KB
testcase_30 AC 1,872 ms
13,952 KB
testcase_31 AC 1,813 ms
13,824 KB
testcase_32 AC 1,988 ms
13,824 KB
testcase_33 TLE -
testcase_34 TLE -
testcase_35 AC 1,989 ms
13,952 KB
testcase_36 TLE -
testcase_37 TLE -
testcase_38 TLE -
testcase_39 TLE -
testcase_40 TLE -
testcase_41 TLE -
testcase_42 TLE -
testcase_43 TLE -
testcase_44 TLE -
testcase_45 TLE -
testcase_46 TLE -
testcase_47 TLE -
testcase_48 TLE -
testcase_49 TLE -
testcase_50 TLE -
testcase_51 AC 1,397 ms
13,824 KB
testcase_52 TLE -
testcase_53 TLE -
testcase_54 TLE -
testcase_55 TLE -
testcase_56 TLE -
testcase_57 TLE -
testcase_58 TLE -
testcase_59 TLE -
testcase_60 TLE -
testcase_61 TLE -
testcase_62 TLE -
testcase_63 TLE -
testcase_64 TLE -
testcase_65 AC 1,459 ms
13,696 KB
testcase_66 TLE -
testcase_67 TLE -
testcase_68 TLE -
testcase_69 TLE -
testcase_70 TLE -
testcase_71 TLE -
testcase_72 TLE -
testcase_73 TLE -
testcase_74 TLE -
testcase_75 TLE -
testcase_76 TLE -
testcase_77 TLE -
testcase_78 AC 1,894 ms
13,952 KB
testcase_79 AC 1,884 ms
13,824 KB
testcase_80 AC 1,875 ms
13,824 KB
testcase_81 AC 1,865 ms
13,952 KB
権限があれば一括ダウンロードができます
コンパイルメッセージ
Possible precedence problem on bitwise & operator at Main.pl line 1.
Main.pl syntax OK

ソースコード

diff #

use bigint;sub f{my($r,$l,$d,$a)=@_;${"@_"}//=$r<3?$l<$d&$d<=$r:do{$a+=f(($r-$_)/5,($l-$_+5)/5-1,$d-$_)for-2..2;$a}}print f<>
0