Submission #3418271


Source Code Expand

say 50;$_=get;(say $_/50+|0+49-$_%50+50*($_%50>$++))xx 50;

Submission Info

Submission Time
Task D - Decrease (Contestant ver.)
User kotatsugame
Language Perl6 (rakudo-star 2016.01)
Score 600
Code Size 58 Byte
Status AC
Exec Time 343 ms
Memory 66712 KB

Judge Result

Set Name Sample All
Score / Max Score 0 / 0 600 / 600
Status
AC × 5
AC × 25
Set Name Test Cases
Sample example0, example1, example2, example3, example4
All corner0, corner1, corner2, corner3, corner4, corner5, corner6, corner7, corner8, corner9, example0, example1, example2, example3, example4, rand0, rand1, rand2, rand3, rand4, rand5, rand6, rand7, rand8, rand9
Case Name Status Exec Time Memory
corner0 AC 343 ms 66712 KB
corner1 AC 159 ms 52760 KB
corner2 AC 160 ms 54172 KB
corner3 AC 161 ms 53780 KB
corner4 AC 157 ms 54168 KB
corner5 AC 162 ms 53528 KB
corner6 AC 159 ms 54164 KB
corner7 AC 159 ms 53400 KB
corner8 AC 159 ms 53652 KB
corner9 AC 158 ms 53656 KB
example0 AC 155 ms 52888 KB
example1 AC 160 ms 53012 KB
example2 AC 161 ms 55700 KB
example3 AC 159 ms 52892 KB
example4 AC 160 ms 54040 KB
rand0 AC 161 ms 53528 KB
rand1 AC 159 ms 53268 KB
rand2 AC 161 ms 53528 KB
rand3 AC 158 ms 52884 KB
rand4 AC 158 ms 53400 KB
rand5 AC 159 ms 54424 KB
rand6 AC 159 ms 54296 KB
rand7 AC 160 ms 54552 KB
rand8 AC 161 ms 54292 KB
rand9 AC 160 ms 52888 KB