Submission #968941

Source Code Expand

use Math::Trig;<>=~/ .* /;$\+=2*$`*sin acos+($a=abs$_*2/$&-1)<($b=abs 2*($_-$')/$&-1)?$a:$b for 1..$&+$'-1;print

Submission Info

Submission Time
Task B - ステップカット
User x20
Language Perl (v5.18.2)
Score 200
Code Size 112 Byte
Status AC
Exec Time 808 ms
Memory 2688 KB

Compile Error

Prototype mismatch: sub Math::Complex::abs (_) vs none at /usr/share/perl/5.18/Math/Complex.pm line 667.
Prototype mismatch: sub Math::Complex::sqrt (_) vs none at /usr/share/perl/5.18/Math/Complex.pm line 718.
Prototype mismatch: sub Math::Complex::exp (_) vs none at /usr/share/perl/5.18/Math/Complex.pm line 849.
Prototype mismatch: sub Math::Complex::log (_) vs none at /usr/share/perl/5.18/Math/Complex.pm line 888.
Prototype mismatch: sub Math::Complex::cos (_) vs none at /usr/share/perl/5.18/Math/Complex.pm line 935.
Prototype mismatch: sub Math::Complex::sin (_) vs none at /usr/share/perl/5.18/Math/Complex.pm line 952.
./Main.pl syntax OK

Judge Result

Set Name Sample All
Score / Max Score 0 / 0 200 / 200
Status
AC × 3
AC × 16
Set Name Test Cases
Sample 00_example_01.txt, 00_example_02.txt, 00_example_03.txt
All 00_example_01.txt, 00_example_02.txt, 00_example_03.txt, 10_rand_01.txt, 10_rand_02.txt, 10_rand_03.txt, 10_rand_04.txt, 10_rand_05.txt, 10_rand_06.txt, 10_rand_07.txt, 10_rand_08.txt, 20_hand_01.txt, 20_hand_02.txt, 20_hand_03.txt, 20_hand_04.txt, 20_hand_05.txt
Case Name Status Exec Time Memory
00_example_01.txt AC 23 ms 2688 KB
00_example_02.txt AC 23 ms 2688 KB
00_example_03.txt AC 412 ms 2688 KB
10_rand_01.txt AC 23 ms 2688 KB
10_rand_02.txt AC 23 ms 2688 KB
10_rand_03.txt AC 222 ms 2688 KB
10_rand_04.txt AC 26 ms 2688 KB
10_rand_05.txt AC 45 ms 2688 KB
10_rand_06.txt AC 35 ms 2688 KB
10_rand_07.txt AC 94 ms 2688 KB
10_rand_08.txt AC 76 ms 2688 KB
20_hand_01.txt AC 411 ms 2688 KB
20_hand_02.txt AC 808 ms 2688 KB
20_hand_03.txt AC 413 ms 2688 KB
20_hand_04.txt AC 22 ms 2688 KB
20_hand_05.txt AC 23 ms 2688 KB