Plot Circle by pooq

read'(i2)',k
do i=-k,k
do j=-k,k
if(i*i+j*j>k*k)then
print'(" "$)'
else
print'("*"$)'
endif
enddo
print*
enddo
end

Note that non-ascii characters in the above source code will be escaped (such as \x9f).

download

return to the top page