Submission #968692

Source Code Expand

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

Submission Info

Submission Time
Task B - ステップカット
User x20
Language Perl (v5.18.2)
Score 200
Code Size 114 Byte
Status AC
Exec Time 302 ms
Memory 2816 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 2816 KB
00_example_02.txt AC 22 ms 2688 KB
00_example_03.txt AC 166 ms 2816 KB
10_rand_01.txt AC 22 ms 2688 KB
10_rand_02.txt AC 22 ms 2688 KB
10_rand_03.txt AC 92 ms 2688 KB
10_rand_04.txt AC 23 ms 2688 KB
10_rand_05.txt AC 30 ms 2688 KB
10_rand_06.txt AC 27 ms 2688 KB
10_rand_07.txt AC 49 ms 2688 KB
10_rand_08.txt AC 40 ms 2688 KB
20_hand_01.txt AC 165 ms 2688 KB
20_hand_02.txt AC 302 ms 2688 KB
20_hand_03.txt AC 161 ms 2816 KB
20_hand_04.txt AC 22 ms 2688 KB
20_hand_05.txt AC 22 ms 2688 KB