$n=<>;
$dir=1;
$id=0;
while(<>){
	chop;
	if($d2 && $_ ne 'drawtwo'){
		$a[$id]-=$d2;
		$d2=0;
		$id=($id+$dir)%$n;
	}
	if($d4 && $_ ne 'drawfour'){
		$a[$id]-=$d4;
		$d4=0;
		$id=($id+$dir)%$n;
	}
	$a[$id]+=1;
	$lastid=$id;
	if($_ eq 'number'){
	}
	if($_ eq 'drawtwo'){
		$d2+=2;
	}
	if($_ eq 'drawfour'){
		$d4+=4;
	}
	if($_ eq 'skip'){
		$id=($id+$dir)%$n;
	}
	if($_ eq 'reverse'){
		$dir=-$dir;
	}
	$id=($id+$dir)%$n;
}
print$lastid+1,$",$a[$lastid];