| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 1273 人关注过本帖
标题:[原创]运筹学决策论c语言源程序
只看楼主 加入收藏
zhangzujin
Rank: 1
等 级:新手上路
帖 子:276
专家分:0
注 册:2005-5-9
收藏
 问题点数:0 回复次数:2 
[原创]运筹学决策论c语言源程序

科学出版社《运筹学》第二版决策论学了之后,自己作了个c程序,大家有兴趣看看,运行一下。 #include<stdio.h> #include<conio.h> #define M 10 int a[M][M],min[M],max[M],b[M],p[M][M],ma; float mp,mid[M],aver[M];

void main( ) { int m,n,i,j,choice,result,t; float c; clrscr( ); printf("It is strongly recommended that you read these items before you do your work.\n"); printf("1. This is a program for operations research.\n"); printf("2. You should read your textbooks to review the principles.\n"); printf("3. There are some defects in this program.\n"); printf(" If any,please send messages to the creator.\n"); printf("4. Copyright 2005-5-12 Zhang Zujin.\n"); printf(" QQ:283421560 E-mail:zhangzujin360732@163.com\n\n"); printf("Input m(fang an),n(zhuangtai):"); scanf("%d,%d",&m,&n); printf("Input shouyi juzheng(m*n):\n"); for(i=0;i<m;i++) for(j=0;j<n;j++) scanf("%d",&a[i][j]); printf("***********************Make a choice***********************\n"); printf("beiguan(1)--leiguan(2)--zhezhong(3)--dengkeneng(4)--yihan(5)\n"); scanf("%d",&choice);

if(choice==1) { for(i=0;i<m;i++) { min[i]=a[i][0]; for(j=1;j<n;j++) if(a[i][j]<min[i]) min[i]=a[i][j]; } result=1; ma=min[0]; for(i=0;i<m;i++) if(min[i]>ma) { result=i+1; ma=min[i]; } printf("Through caculating,the result is:\n"); for(i=0;i<m;i++) printf("%d\n",min[i]); printf("The result is:u(%d)=%d\n",result,ma); }

if(choice==2) { for(i=0;i<m;i++) { max[i]=a[i][0]; for(j=1;j<n;j++) if(a[i][j]>max[i]) max[i]=a[i][j]; } result=1; ma=max[0]; for(i=0;i<m;i++) if(max[i]>ma) { ma=max[i]; result=i+1; } printf("Through calculating,the result is:\n"); for(i=0;i<m;i++) printf("%d\n",max[i]); printf("The result is:u(%d)=%d\n",result,ma); }

if(choice==3) { printf("Input leguanxishu:"); scanf("%f",&c); if((c>=0)&&(c<=1)) { for(i=0;i<m;i++) { max[i]=a[i][0]; min[i]=a[i][0]; for(j=0;j<n;j++) { if(a[i][j]>max[i]) max[i]=a[i][j]; if(a[i][j]<min[i]) min[i]=a[i][j]; } mid[i]=c*max[i]+(1-c)*min[i]; } result=1; mp=mid[0]; for(i=0;i<m;i++) if(mid[i]>mp) { mp=mid[i]; result=i+1; } } else { printf("Error,the leguan xishu must be in [0,1]!\n"); return; } printf("Through calculating,the result is:\n"); for(i=0;i<m;i++) printf("%.2f\n",mid[i]); printf("The result is:u(%d)=%.2f\n",result,mp); }

if(choice==4) { for(i=0;i<m;i++) { aver[i]=0; for(j=0;j<n;j++) aver[i]+=(float)a[i][j]; aver[i]=aver[i]/n; } result=1; mp=aver[0]; for(i=1;i<m;i++) if(aver[i]>mp) { mp=aver[i]; result=i+1; } printf("Through calculating,the result is:\n"); for(i=0;i<m;i++) printf("%.2f\n",aver[i]); printf("The result is:u(%d)=%.2f\n",result,mp); }

if(choice==5) { for(j=0;j<n;j++) { b[j]=a[0][j]; for(i=1;i<m;i++) if(a[i][j]>b[j]) b[j]=a[i][j]; } for(j=0;j<n;j++) for(i=0;i<m;i++) p[i][j]=b[j]-a[i][j]; for(i=0;i<m;i++) { max[i]=p[i][0]; for(j=1;j<n;j++) if(p[i][j]>max[i]) max[i]=p[i][j]; } ma=max[0]; result=1; for(i=0;i<m;i++) if(max[i]<ma) { ma=max[i]; result=i+1; } printf("Through calculating,the result is:\n"); printf("***houhui juzhen******min***\n"); for(i=0;i<m;i++) { for(j=0;j<n;j++) printf("%4d",p[i][j]); printf("%8d",max[i]); printf("\n"); } printf("The result is:u(%d)=%d\n",result,ma); }

getch( ); }

搜索更多相关主题的帖子: 决策论 运筹学 c语言 
2005-05-14 11:14
tary
Rank: 1
等 级:新手上路
帖 子:780
专家分:0
注 册:2004-10-5
收藏
得分:0 
&lt;&lt;运筹学&gt;&gt;决策论.....这个是什么书啊/??

┌→¨ ≮我可以学会对你很冷落≯¨←┐ │  <却学不╓══╦══╖会将爱> │ │¨←┐ ╭╩╮哭‖哭╭╩╮ ┌→¨│ └──┘收 ╲╱ ◇‖◇ ╲╱回└──┘
2005-05-14 15:32
Rank: 1
等 级:新手上路
帖 子:255
专家分:0
注 册:2005-4-25
收藏
得分:0 
靠 这不会就是电脑算命的原形吧???

/bbs/showimg.asp?BoardID=5&filename=2005-4/2005427111228529.jpg" border="0" onload="if(this.width>screen.width*0.7) {this.resized=true; this.width=screen.width*0.7; this.alt='Click here to open new window\nCTRL+Mouse wheel to zoom in/out';}" onmouseover="if(this.width>screen.width*0.7) {this.resized=true; this.width=screen.width*0.7; this.style.cursor='hand'; this.alt='Click here to open new window\nCTRL+Mouse wheel to zoom in/out';}" onclick="if(!this.resized) {return true;} else {window.open('http://bbs./bbs/showimg.asp?BoardID=5&filename=2005-4/2005427111228529.jpg');}" onmousewheel="return imgzoom(this);" alt="" /> 欢迎加入C语言QQ群698156 我们都是菜鸟乃至新手 坚信有一天定能展翅高飞 因为有着努力的决心 衷心盼望你的到来 让我们一起进步
2005-05-14 22:40
快速回复:[原创]运筹学决策论c语言源程序
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.028518 second(s), 7 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved