1。有N个人排队到R个相同的水龙头去打水,他们装满各自水桶的时间T1、T2....,Tn为整数互不相等,应如何安排他们打水的顺序才能使他们花费的总时间最少?(花费的总时间=每个花费时间的总和)
2。把小于整数N的所有数重新排列,使每对相邻的数都有大于或等于2的公约数。比如,N=10 时,4,8,6,9就是一各合乎规则的排列。编一程序,输入N后完成上述工作,并昼使排列有一定的规律性。
2。把小于整数N的所有数重新排列,使每对相邻的数都有大于或等于2的公约数。比如,N=10 时,4,8,6,9就是一各合乎规则的排列。编一程序,输入N后完成上述工作,并昼使排列有一定的规律性。
解决方案 »
- cann't load package 'rtl70'. It contains unit 'System',which is also contain
- HexToBin的问题!!!救命
- 我想写自动访问web页面的
- 紧急求救,有谁用delphi 开发过 snmp 代理啊?
- 如何在delphi里建立图,和实现图的历遍??
- 有关DBRichEdit的问题,请进!
- 谁能介绍几个好用的打印控件?并说明如何使用!
- 关于程序显示的问题!!!高分奉送!!!关注有分!!!
- 我正在下载delhpi5.0 帮助书籍,50m,我手头的事delhpi5.5的安装盘〉。。。
- 能不能改變delphi 的系統錯誤的提示信息....
- 谁有delphi的三层模式的数据库开发的例子
- 论坛自动发帖子相关的几个问题,请高手赐教?
1
type c{int T,B;}
P[n]:c;
int n;{几个人}
int r;{几个龙头}
int m:{最少的时间,初值为0}
function Buf(p[n]:c):bool;{返回是否有没打水的人,p[n].b=0}
function Bufweter(p[n]:c):bool;{返回是否有可用的水龙头,p[n].t=0 记数 p[n].b=0 状态}
算法
永真循环
begin
穷举
每个结果时间与m比较,比m小就 覆盖m
如果buf返回真结束循环
end
打印m