read n r=`seq -$n $n` a=(\ \*) for i in $r;do b=;for j in $r;do b+="${a[i*i+j*j<=n*n]}";done;echo "$b";done
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page