็ตๆ
ๅ้ก | No.1106 ๐ฆ ไฝไบใใใฉใณในใๅคงไบ |
ใฆใผใถใผ |
![]() |
ๆๅบๆฅๆ | 2020-07-07 11:00:21 |
่จ่ช | Perl (5.40.0) |
็ตๆ |
AC
|
ๅฎ่กๆ้ | 25 ms / 2,000 ms |
ใณใผใ้ท | 126 bytes |
ใณใณใใคใซๆ้ | 86 ms |
ใณใณใใคใซไฝฟ็จใกใขใช | 6,812 KB |
ๅฎ่กไฝฟ็จใกใขใช | 6,944 KB |
ๆ็ตใธใฃใใธๆฅๆ | 2024-09-25 09:51:26 |
ๅ่จใธใฃใใธๆ้ | 3,489 ms |
ใธใฃใใธใตใผใใผID ๏ผๅ่ๆ ๅ ฑ๏ผ |
judge1 / judge5 |
๏ผ่ฆใญใฐใคใณ๏ผ
ใใกใคใซใใฟใผใณ | ็ตๆ |
---|---|
sample | AC * 5 |
other | AC * 77 |
ใณใณใใคใซใกใใปใผใธ
Possible precedence problem on bitwise & operator at Main.pl line 1. Main.pl syntax OK
ใฝใผในใณใผใ
use integer;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<>