[opex]

а еще так

r = 30;
_root.createEmptyMovieClip("okr", 1);
okr.beginFill(0x000000, 0);
okr.lineStyle(1, 0x000000, 100);
okr.moveTo(-1*_root.r, 0);
for (x=_root.r*-1; x<=_root.r; x++) {
	y = Math.sqrt(Math.pow(_root.r, 2)-Math.pow(x, 2));
	okr.lineTo(x, y);
}
for (x=_root.r; x>=-1*_root.r; x--) {
	y = -1*Math.sqrt(Math.pow(_root.r, 2)-Math.pow(x, 2));
	okr.lineTo(x, y);
}