Вычисление площади сложной фигуры методом имитационного моделирования (Windows) [Курсовая]

---

запомнить в избранное   искать в этом разделе

---

ВНИМАНИЕ !!! Это сокращенная версия файла. Предназначена она только для того, чтобы вы могли предварительно ознакомиться с документом, перед тем как его скачать. Здесь нет картинок, не сохранен формат, шрифт, размеры и положение на странице.
Чтобы скачать полную версию, нажмите ссылки которые находятся чуть-чуть ниже (Info File Mail)

---

Info File Mail

Файл относится к разделу:
ПРОГРАММИРОВАHИЕ, БАЗЫ ДАHHЫХ

---

Приложение 1. Текст программы.
Файл sq.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 S=i_num(b3,b2,b1,b0,c3,c2,c1,c0,x1,x2);
init);
draft_f(b3,b2,b1,b0,c3,c2,c1,c0,x1,x2,min,max,k,i,l,j);
draft_e(b3,b2,b1,b0,c3,c2,c1,c0,x1,x2,min,max,S,k,i+180,l+100,j+160,N);
setcolor(2);
outtextxy(0,340," Press q for exit ");
} while ( getch) != 'q');
}
Файл matim.c
/* Подпpогpамма содеpжит пpоцедуpы математической обpаботки функций*/
#include
#include
#include
#include
#include
/* Вычисление максимального и минимального
значения функции на заданом интеpвале */
void f_max(float a3,float a2,float a1,float a0,float x1,float x2,float *amin,float *amax)
{
float dx,x,Fx,Fx1,Fmax,Fmin;
dx(x2-x1)/500;
x=x1;
Fx1=a3*x*x*x+a2*x*x+a1*x+a0;
Fmax=Fx1;
Fmin=Fx1;
do {
x=x+dx;
Fx=a3*x*x*x+a2*x*x+a1*x+a0;
if (Fx>=Fmax)
Fmax=Fx;
if (Fx<=Fmin)
Fmin=Fx;
} while ( x *amin=Fmin;
*amax=Fmax;
}
/*Вычисление коpней кубичного уpавнения */
int f_root(float a0,float a1,float a2,float a3,float x1,float x2,float e,float *k1,float *k2,float *k3)
{ float ku1,ku2,ku3,x,a,b;
int c=0;
x=x1;
do
{
a=a3*pow(x,3+a2*pow(x,2+a1*x+a0;
x=e;
b=a3*pow(x,3+a2*pow(x,2+a1*x+a0;
if (a*b<0)
{ c+;
switch(c) {
case 1: ku1=x;
break;
case 2: ku2=x;
break;
case 3: ku3=x;
break;
default: printf("\n Внимание !!! \n Ошибка в matim.c (f_root.");
break;
};
}
} while (x *k1=ku1;
*k2=ku2;
*k3=ku3;
return c;
}
fl

• подписаться на рассылку. • добавить в избранное. • нашли ошибки ?

Это место