Submission #2552759


Source Code Expand

$n=<>;
for(<>){
	($v,$w)=glob;
	if($n<2){print$v,$/}
	else{
		$w<$v&&(($w,$v)=($v,$w)),$w=($w+$n-2)/$n|0while$v-$w;
		print$v,$/
	}
}

Submission Info

Submission Time
Task B - Evergrowing Tree
User kotatsugame
Language Perl (v5.18.2)
Score 0
Code Size 141 Byte
Status TLE
Exec Time 2105 ms
Memory 17664 KB

Compile Error

./Main.pl syntax OK

Judge Result

Set Name Sample All
Score / Max Score 0 / 0 0 / 100
Status
AC × 2
AC × 15
TLE × 5
Set Name Test Cases
Sample a01, a02
All a01, a02, b03, b04, b05, b06, b07, b08, b09, b10, b11, b12, b13, b14, b15, b16, b17, b18, b19, b20
Case Name Status Exec Time Memory
a01 AC 5 ms 768 KB
a02 AC 5 ms 768 KB
b03 AC 5 ms 768 KB
b04 AC 623 ms 15744 KB
b05 AC 409 ms 17664 KB
b06 TLE 2105 ms 15744 KB
b07 TLE 2105 ms 15616 KB
b08 AC 762 ms 16512 KB
b09 TLE 2105 ms 15744 KB
b10 TLE 2105 ms 15744 KB
b11 TLE 2092 ms 17664 KB
b12 AC 1784 ms 15744 KB
b13 AC 1652 ms 15744 KB
b14 AC 1204 ms 15744 KB
b15 AC 1117 ms 15744 KB
b16 AC 1050 ms 15744 KB
b17 AC 1065 ms 15744 KB
b18 AC 1064 ms 15744 KB
b19 AC 1005 ms 15744 KB
b20 AC 950 ms 15744 KB