Реферат: Расчет площади сложной фигуры с помощью метода имитационного моделирования

}

/*Обводит непpеpывный контуp */

void f_draft(float a0,float a1,float a2,float a3,float dx,float a,float b,float x1)

{

float xt,y,x;

xt=x1-dx;

y=ceil(a*(a0+a1*x1+a2*x1*x1+a3*x1*x1*x1)+b);

moveto(k,y);

for (x=k-1;x<l+1;x++)

{

y=a*(a0+a1*xt+a2*xt*xt+a3*xt*xt*xt)+b;

lineto(x,y);

xt+=dx;

delay(0);

}

}

/*Рисует оси кооpдинат */

void osi(float x1,float x2,float b)

{

float c;

setcolor(4);

setlinestyle(0,1,1);

settextstyle(2,HORIZ_DIR,4);

setfillstyle(3,13);

line(k-5,b,l+5,b);

c=k-x1*(l-k)/(x2-x1);

line(c,i-5,c,j+5); /*ось y */

outtextxy(l+10,b-2,"x");

outtextxy(c+3,i-12,"y");