Читать реферат по математике: "РАСЧЕТ ПЛОЩАДИ СЛОЖНОЙ ФИГУРЫ МЕТОДОМ ИМИТАЦИОННОГО МОДЕЛИРОВАНИЯ" Страница 5

(Назад) (Cкачать работу)

   Пpогpамма SQ основная

*/

#include

#include

#include

#include

#include

#include "matim.c"

#include "window.c"

#include "f_integr.c"

#include "draft.c"

#include "draft_f.c"

#include "draft_e.c"

int k=20,i=15,l=270,j=140;

void main(void)

{

float b0,b1,b2,b3,c0,c1,c2,c3,x1,x2,maxb,maxc,minb,minc,min,max,S;

int N;

do{

  closegraph();

  get_poly(&b3,&b2,&b1,&b0,&c3,&c2,&c1,&c0,&x1,&x2,&N);

  f_max(b3,b2,b1,b0,x1,x2,&minb,&maxb);

  f_max(c3,c2,c1,c0,x1,x2,&minc,&maxc);

max=(maxb>maxc)?maxb:maxc;

min=(minb=Fmax)

               Fmax=Fx;

       if (Fx100) { talkerror(); goto C2; }

C1:        gotoxy(k2,k+2);   puts("c1=               ");

            gotoxy(k2+4,k+2);   gets(cc1); sscanf(cc1,"%f",&c1);

                  if (fabs(c1)>100) { talkerror(); goto C1; }

C0:      gotoxy(k2,k+3);   puts("c0=               ");

            gotoxy(k2+4,k+3);   gets(cc0); sscanf(cc0,"%f",&c0);

                  if (fabs(c0)>100) { talkerror(); goto C0; }

X1:      gotoxy(k1,k+6);   puts("x1=                ");

            gotoxy(k2,k+6);   puts("x2=                ");

            gotoxy(k1+4,k+6);   gets(x1c); sscanf(x1c,"%f",&x1);

                  if (fabs(x1)>100) { talkerror(); goto X1; }

X2:        gotoxy(k2,k+6);   puts("x2=                ");

            gotoxy(k2+4,k+6);   gets(x2c); sscanf(x2c,"%f",&x2);

                  if (fabs(x2)>100) { talkerror(); goto X2; }

                  if (x1>=x2) { talkerror(); goto X1; }

V: R:     gotoxy(k1,k+10); puts("QUANTITY OF ADRESSES TO RNG                ");

            gotoxy(k1+30,k+10);   gets(nc); sscanf(nc,"%d",&N);

                  if (N>32000) { talkerror(); goto R; }

                  if (N

Похожие работы