$x=a;$y=a;
for(2..<>){
	print$y.++$x;
	$y=~y/a-z/b-za/;
	print$y,$/;
}
print$y.n,$/;