Submission #2704423


Source Code Expand

Copy
use v6;

my int $n = +get;
my int @cs = do +get for ^$n;
@cs.race(batch => 25).map(-> $x {
  my int $divs = -1;
  $divs++ if $x %% $_ for @cs;
  (($divs div 2 + 1) / ($divs + 1)).Num
}).sum.say;

Submission Info

Submission Time
Task C - コイン
User C01L
Language Perl6 (rakudo-star 2016.01)
Score 100
Code Size 204 Byte
Status AC
Exec Time 434 ms
Memory 90000 KB

Judge Result

Set Name Sample Subtask1 Subtask2
Score / Max Score 0 / 0 99 / 99 1 / 1
Status
AC × 3
AC × 20
AC × 40
Set Name Test Cases
Sample sample_01.txt, sample_02.txt, sample_03.txt
Subtask1 subtask1_01.txt, subtask1_02.txt, subtask1_03.txt, subtask1_04.txt, subtask1_05.txt, subtask1_06.txt, subtask1_07.txt, subtask1_08.txt, subtask1_09.txt, subtask1_10.txt, subtask1_11.txt, subtask1_12.txt, subtask1_13.txt, subtask1_14.txt, subtask1_15.txt, subtask1_16.txt, subtask1_17.txt, subtask1_18.txt, subtask1_19.txt, subtask1_20.txt
Subtask2 subtask1_01.txt, subtask1_02.txt, subtask1_03.txt, subtask1_04.txt, subtask1_05.txt, subtask1_06.txt, subtask1_07.txt, subtask1_08.txt, subtask1_09.txt, subtask1_10.txt, subtask1_11.txt, subtask1_12.txt, subtask1_13.txt, subtask1_14.txt, subtask1_15.txt, subtask1_16.txt, subtask1_17.txt, subtask1_18.txt, subtask1_19.txt, subtask1_20.txt, subtask2_01.txt, subtask2_02.txt, subtask2_03.txt, subtask2_04.txt, subtask2_05.txt, subtask2_06.txt, subtask2_07.txt, subtask2_08.txt, subtask2_09.txt, subtask2_10.txt, subtask2_11.txt, subtask2_12.txt, subtask2_13.txt, subtask2_14.txt, subtask2_15.txt, subtask2_16.txt, subtask2_17.txt, subtask2_18.txt, subtask2_19.txt, subtask2_20.txt
Case Name Status Exec Time Memory
sample_01.txt AC 273 ms 67412 KB
sample_02.txt AC 270 ms 67032 KB
sample_03.txt AC 273 ms 67024 KB
subtask1_01.txt AC 265 ms 67024 KB
subtask1_02.txt AC 266 ms 67152 KB
subtask1_03.txt AC 269 ms 67024 KB
subtask1_04.txt AC 275 ms 67156 KB
subtask1_05.txt AC 274 ms 67152 KB
subtask1_06.txt AC 273 ms 67152 KB
subtask1_07.txt AC 274 ms 67152 KB
subtask1_08.txt AC 280 ms 67152 KB
subtask1_09.txt AC 269 ms 67028 KB
subtask1_10.txt AC 269 ms 67152 KB
subtask1_11.txt AC 267 ms 67152 KB
subtask1_12.txt AC 270 ms 67152 KB
subtask1_13.txt AC 269 ms 67028 KB
subtask1_14.txt AC 270 ms 67152 KB
subtask1_15.txt AC 270 ms 67152 KB
subtask1_16.txt AC 271 ms 67156 KB
subtask1_17.txt AC 270 ms 68240 KB
subtask1_18.txt AC 268 ms 67156 KB
subtask1_19.txt AC 270 ms 67160 KB
subtask1_20.txt AC 270 ms 67156 KB
subtask2_01.txt AC 275 ms 67280 KB
subtask2_02.txt AC 278 ms 67412 KB
subtask2_03.txt AC 281 ms 67796 KB
subtask2_04.txt AC 312 ms 72364 KB
subtask2_05.txt AC 407 ms 81568 KB
subtask2_06.txt AC 373 ms 77632 KB
subtask2_07.txt AC 353 ms 79464 KB
subtask2_08.txt AC 407 ms 83736 KB
subtask2_09.txt AC 425 ms 84004 KB
subtask2_10.txt AC 402 ms 88252 KB
subtask2_11.txt AC 414 ms 90000 KB
subtask2_12.txt AC 420 ms 88376 KB
subtask2_13.txt AC 323 ms 75784 KB
subtask2_14.txt AC 411 ms 83220 KB
subtask2_15.txt AC 406 ms 82040 KB
subtask2_16.txt AC 431 ms 83992 KB
subtask2_17.txt AC 408 ms 87404 KB
subtask2_18.txt AC 333 ms 74016 KB
subtask2_19.txt AC 434 ms 83348 KB
subtask2_20.txt AC 413 ms 81876 KB