for(y,-n:="
<"at(Date second&3),n,for(x,-n,n,if(y*y+x*x>n*n," ","*")print)writeln)