read r
eval set {$r..-$r}**2
for y;{
for x;{
printf \\$[x+y>$1?40:52]
}
echo
}