Submission #1190517


Source Code Expand

$p=3.14159265358979323846;
$f=200.0;
($a,$b,$c)=glob<>;
$s=($\+$f)/2,($a*$s+$b*sin($c*$s*$p)<100.0?$\:$f)=$s for 1..100;
print

Submission Info

Submission Time
Task D - 高橋君ボール1号
User kotatsugame
Language Perl (v5.18.2)
Score 100
Code Size 130 Byte
Status AC
Exec Time 5 ms
Memory 768 KB

Compile Error

./Main.pl syntax OK

Judge Result

Set Name Sample All
Score / Max Score 0 / 0 100 / 100
Status
AC × 2
AC × 17
Set Name Test Cases
Sample example_0.txt, example_1.txt
All example_0.txt, example_1.txt, random_0.txt, random_1.txt, random_2.txt, random_3.txt, random_4.txt, random_5.txt, random_6.txt, random_7.txt, random_8.txt, random_9.txt, special_0.txt, special_1.txt, special_2.txt, example_0.txt, example_1.txt
Case Name Status Exec Time Memory
example_0.txt AC 5 ms 768 KB
example_1.txt AC 5 ms 768 KB
random_0.txt AC 5 ms 768 KB
random_1.txt AC 5 ms 768 KB
random_2.txt AC 5 ms 768 KB
random_3.txt AC 5 ms 768 KB
random_4.txt AC 5 ms 768 KB
random_5.txt AC 5 ms 768 KB
random_6.txt AC 5 ms 768 KB
random_7.txt AC 5 ms 768 KB
random_8.txt AC 5 ms 768 KB
random_9.txt AC 5 ms 768 KB
special_0.txt AC 5 ms 768 KB
special_1.txt AC 5 ms 768 KB
special_2.txt AC 5 ms 768 KB