#!/usr/bin/perl
$_=_($_);$_+=$_;$?=$_**$_;$?.=$|;$?=~s;${|};$_;;$@=$?>>1;$@+=$_;$sub=$print='a';while($while=<DATA>){$until=$while%$?;$while=$while%$@;until($while==$d){ $print=_($print);$while--;}$until?print"$print":print" ";$print=$sub;}print"\n";sub _{$_=shift;$_++;return$_;}
__END__
9
66
87
479
588
943
1324
3142
5907
7068
13275
25317
7182
5903
4052
2363
931
504
398
161
71
10