do
pull n
do i=1 to n
s=
do j=1 to n
a=i;b=j
do while b>0
t=a//b;a=b;b=t
end
s=s||d2c(32+84*(a=1))
end
say s
end
end