实验三单纯型法

《实验三单纯型法》由会员上传分享，免费在线阅读，更多相关内容在行业资料-天天文库。

1、实验3单纯形法求解线性规划实验内容：用单纯形法求解下列线性规划实验源程序#include#include#includefloatmatrix[100][100],x[100];/*记录总方程的数组,解的数组*/inta[100];/*记录基础,非基础的解的情况,0:非基础,1:基础*/intm,n,s,type;/*方程变量,约束数,求最大最小值的类型,0:最小1:最大*/intindexe,indexl,indexg;/*剩余变量,松弛变量,人工变量*/voidJckxj(){inti,j;for(

2、i=0;i=0.000001)if(matrix[n][i]<0)return0;return1;}intMin(){inti,temp=0;floatmin=matrix[n][0];for(i=1;imatrix

3、[n][i]){min=matrix[n][i];temp=i;}returntemp;}voidJustArtificial(){inti;for(i=m+indexe+indexl;i=0.000001){printf("NoAnswer");return;}}intCheck(intin){inti;floatmax1=-1;for(i=0;i=0.000001&&max1

4、[i][s]/matrix[i][in];if(max1<0)return1;return0;}intSearchOut(int*temp,intin){inti;floatmin=10000;for(i=0;i=0.000001&&(matrix[i][s]/matrix[i][in]>=0)&&min>matrix[i][s]/matrix[i][in]){min=matrix[i][s]/matrix[i][in];*temp=i;}for(i=0;i

5、rix[*temp][i]==1)returni;}voidMto(intin,inttemp){inti;for(i=0;i<=s;i++)if(i!=in)matrix[temp][i]=matrix[temp][i]/matrix[temp][in];matrix[temp][in]=1;}voidBe(inttemp,intin){inti,j;floatc;for(i=0;i<=n;i++){c=matrix[i][in]/matrix[temp][in];if(i!=temp)for(j=0;j<=s;j++)matrix[i][j]=matrix

6、[i][j]-matrix[temp][j]*c;}}voidAchange(intin,intout){inttemp=a[in];a[in]=a[out];a[out]=temp;}voidPrint(){inti,j,k,temp=0;for(i=0;i

7、s;j++)printf("%8.2f",matrix[n][j]);printf("");}voidInitPrint(){inti;printf("X");for(i=0;i

8、tf("Zmin=%f",ma