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

setcolor(5);

sprintf(s,"S=%3.2f",Sn);

outtextxy(l+120,i-40,s);

outtextxy(l+50,i-20,"N");

outtextxy(l+120,i-20,"Sr");

outtextxy(l+220,i-20,"Sn-Sr");

xl=k;

yl=j;

for(v=1;v<11;v++){

nt=ceil(v*dx);

Sr=i_rand(b3,b2,b1,b0,c3,c2,c1,c0,x1,x2,min,max,nt);

x=k+v*(l-k)/10;

y=a*Sr+j;

setcolor(2);

line(xl,yl,x,y);

xl=x;

yl=y;

setcolor(4);

settextstyle(2,VERT_DIR,4);

sprintf(s,"%d",nt);

outtextxy(x,j+3,s);

setcolor(8);

settextstyle(2,HORIZ_DIR,4);

outtextxy(l+40,i+(v-1)*10,s);

sprintf(s,"%3.2f",Sr);

outtextxy(l+110,i+(v-1)*10,s);

Ss=100-(Sr*100/Sn);

sprintf(s,"%2.1f%",Ss);

outtextxy(l+205,i+(v-1)*10,s);