็ตๆžœ

ๅ•้กŒ No.1106 ๐Ÿฆ‰ ไฝ•ไบ‹ใ‚‚ใƒใƒฉใƒณใ‚นใŒๅคงไบ‹
ใƒฆใƒผใ‚ถใƒผ tails
ๆๅ‡บๆ—ฅๆ™‚ 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

ใ‚ฝใƒผใ‚นใ‚ณใƒผใƒ‰

diff #
ใƒ—ใƒฌใ‚ผใƒณใƒ†ใƒผใ‚ทใƒงใƒณใƒขใƒผใƒ‰ใซใ™ใ‚‹

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<>
ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”ื”
XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
0