make " rcs 2 for[x -: :][for[y -: :][type(if x*x+y*y>:*:["\ ]["*])]pr[]]bye