p=print
p(1)
for i in range(2,101):
w="";x=-1
for n in"$%')-/359?AGKMQW]_eikqu{\x83":
n=ord(n)-34;x+=1
if i%n<1:w+="DFBMPQ"[x%6]+"oiuea"[x%5]+"zz"
while i%n<1:i/=n
if i<n:p(w);break
Note that non-ascii characters in the above source code will be escaped (such as \x9f).