open window 100, 100
clear window

for i = 1 to 100
	repeat
		x = ran(30)-15
		y = ran(30)-15
		r = sqr(x*x + y*y)
	until 10 <= r and r <= 15
	color 255, 0, 0
	dot x+15, y+15
next i
end