AtCoder Grand Contest 008

Submission #1042085

Source codeソースコード

($x,$y)=glob<>;
if($x==0){
	print abs($y)+($y<0),$/
}elsif($y==0){
	print abs($x)+($x>0),$/
}elsif($x*$y<0){
	print abs(abs($y)-abs($x))+1,$/
}elsif($x<$y){
	print$y-$x,$/
}else{
	print abs(abs($y)-abs($x))+2,$/
}

Submission

Task問題 A - Simple Calculator
User nameユーザ名 %20
Created time投稿日時
Language言語 Perl (v5.18.2)
Status状態 AC
Score得点 300
Source lengthソースコード長 226 Byte
File nameファイル名
Exec time実行時間 7 ms
Memory usageメモリ使用量 768 KB

Compiler messageコンパイルメッセージ

./Main.pl syntax OK

Test case

Set

Set name Score得点 / Max score Cases
Sample - 0_00.txt,0_01.txt,0_02.txt
All 300 / 300 0_00.txt,0_01.txt,0_02.txt,1_00.txt,1_01.txt,1_02.txt,1_03.txt,1_04.txt,1_05.txt,1_06.txt,1_07.txt,1_08.txt,1_09.txt,1_10.txt

Test case

Case name Status状態 Exec time実行時間 Memory usageメモリ使用量
0_00.txt AC 7 ms 768 KB
0_01.txt AC 7 ms 768 KB
0_02.txt AC 7 ms 768 KB
1_00.txt AC 7 ms 768 KB
1_01.txt AC 7 ms 768 KB
1_02.txt AC 7 ms 768 KB
1_03.txt AC 7 ms 768 KB
1_04.txt AC 7 ms 768 KB
1_05.txt AC 7 ms 768 KB
1_06.txt AC 7 ms 768 KB
1_07.txt AC 7 ms 768 KB
1_08.txt AC 7 ms 768 KB
1_09.txt AC 7 ms 768 KB
1_10.txt AC 7 ms 768 KB