Mmidpoint Theorem

Mmidpoint Theorem

function Cirlce(radius)

x = input('Enter the radius of the circle');

y = 0;

p = 1 - x;

figure;

hold on;

plotPoints(x, y);

while x > y

y = y + 1;

if p <= 0

p = p + 2*y + 1;

else

x = x - 1;

p = p + 2*y - 2*x + 1;

end

plotPoints(x, y);

end

function plotPoints(x, y)

plot(x, y, 'o');

plot(x, -y, 'o');

plot(-x, y, 'o');

plot(-x, -y, 'o');

plot(y, x, 'o');

plot(y, -x, 'o');

plot(-y, x, 'o');

plot(-y, -x, 'o');

drawnow;

end

xlabel('x-co-ordinate')

ylabel('y-co-ordinate')

end