Постройте график в ms excel x = r*cos(t) y = r*sin(t) r=3 t=[0; 2pi] вычислить и создать график в табличном редакторе excel должна получиться окружность, заранее

Вариант в excel 2003 с шагом h=0.2

uses graphABC;

begin

setwindowsize(600,500);

setbrushcolor(clGray);

Ellipse(320,30,490,400);

Ellipse(120,30,300,400);

setbrushcolor(clMintCream);

Ellipse(335,40,480,380);

Ellipse(140,40,280,380);

setbrushcolor(clGray);

Ellipse(100,430,500,130);

setbrushcolor(clNavy);

Ellipse(250,240,200,310);

Ellipse(350,240,400,310);

setbrushcolor(clwhite);

Ellipse(240,270,220,300);

Ellipse(360,270,380,300);

setbrushcolor(clblack);

Ellipse(270,330,330,370);

line(300,370,300,400);

Arc(300,280,120,220,-40);

line(50,350,200,350);

line(30,340,190,340);

line(10,330,180,330);

line(410,330,570,330);

line(400,340,560,340);

line(390,350,550,350);

line(240,230,220,150);

line(230,230,180,80);

line(220,230,180,150);

line(360,230,380,150);

line(370,230,430,80);

line(380,230,430,150);

end.

 if (N mod 2 <> 0) and (N mod 3 = 0) then

 if ((N >= 345) and (N < 543)) or (N mod 7 = 0) then

 if (N mod 3 = 0) or (N mod 10 = 0) then

 if (N >= 231) and (N < 312) and (N mod 3 <> 0) then

 if (N mod 2 <> 0) and (N div 10 mod 10 <= 5) then

 if (N > 9) and (N < 100) and (N mod 10 = N div 10) then

 if (N mod 10 = 4) and (N div 100 mod 10 > 3) then

 if (N > 9) and (N < 100) and (N div 10 mod 2 <> 0) then

 if (N mod 2 = 0) and (N div 10 mod 10 > 5) then

 if (N > 99) and (N < 1000) and (N div 100 = 8) then

 if (a mod 2 = 0) or (b mod 2 = 0) then

 if (a + b > 56) and (a + b < 145) then

 if (a mod 10 = 6) and (b mod 10 = 6)

 if (a > 0) and (b > 9) and (b < 100) then  

 if (a div 10 mod 10 < 5) or (b div 100 mod 10 > 3) then  

 if (a mod 3 = 0) or (b mod 5 <> 0) then

 if (a > 0) and (b >= 0) then

 if (a > 100) or (b > 100) then  

 if (a mod 8 > 4) and (b mod 12 < 5) then  

 if (a mod 2 <> 0) and (b mod 2 <> 0) then