一、租用游艇问题(pascal)

WI游艇租赁公司专长于带船员的豪华游艇包租服务，提供奢华大帆船、动力游艇及超级游艇的租赁，涉及全球最美丽的海域，地中海，加勒比海，印度洋，南太平洋，亚洲地区等。

地中海地区包括：

西地中海

科西嘉岛 法国 西班牙 巴塞罗那 白色海岸

意大利 热那亚 里古利亚 那不勒斯 萨勒诺 罗马 撒丁岛 西西里 托斯卡尼 威尼斯

东地中海

克罗地亚 达尔马提亚 史普里特 杜布罗夫尼克 北克罗地亚

希腊 雅典 基克拉底 多得卡尼斯 爱奥尼亚海

土耳其

加勒比海地区: 美国，巴西，巴拿马，巴哈马群岛，委内瑞拉

印度洋地区：塞舌尔，马尔代夫，马达加斯加

亚洲地区： 泰国，马来西亚，印度尼西亚，巴厘岛，缅甸,新加坡，香港

太平洋地区：波利尼西亚，澳大利亚，新西兰，斐济，汤加

简单动规

可以说是佛洛依德算法的简化，应该是用f[i]表示从1到i用的最少费用，一定是从1到某个点j的最少费用加上j到i的费用

f[i]=f[j]+a[j,i]

如果怕有个点k使a[j,k]+a[k,i]<a[j,i]那么就一定有f[k]+a[k,i]是更优解，而k也在1到i范围内，所以不必担心，求到得一定是最优解

到了程序中直接用

a[1,i]=a[1,j]+a[j,i]

边界条件a[i,i]=0

程序为

var n,i,j:longint;a:array[1..200,1..200]of longint;

begin

readln(n);

for i:=1 to n-1 do

begin for j:=i+1 to n do read(a[i,j]);readln;end;

for i:=2 to n do

for j:=1 to i-1 do

if a[1,j]+a[j,i]<a[1,i] then a[1,i]:=a[1,j]+a[j,i];

writeln(a[1,n]);

end.

二、你认识哪些看起来穷的人，实际上非常有钱？

我有一个小姨子，超有钱。包包，鞋子都大几千，有的甚至上万，鞋子衣服一屋子，有的几乎买了穿一次就不再穿了，手里信用卡就8、9张。她三河燕郊上的三本。说是给一个保险公司做业务，业务好一月挣过万。(我就一中专生在一家私企辛苦干15年了，技术工，现在一月工资7800元。我都不敢这么花。)不过。MLGB的每两年准有要账的电话打到亲朋好友。我跟我媳妇都他妈的换了好机会手机号码了。麻痹的跟老丈母娘说了事情的严重性，就是不听。。操。两年前给堵了一次窟窿，10W左右吧。。。他妈的这回光网贷就17W多。我就草了这是我活34年看见过的最有钱的人。PS：各位别多想，多问。实话实说。就我那小姨子要是出去卖的话，我看也就值50一次的主。。白给我玩我不玩，闲磕碜。。

大学室友，每个周末都要和我去做兼职，为了一天8个小时60块钱，生活朴素，穿的干净整洁，背的包包都是大牌，只是我们问她，她都说是她姐姐送她的高仿，一起四年，处的融洽，毕业后，他爸爸请全班同学吃饭，才知道他家还有2个哥哥，他是家里的小女儿，父母家族企业，房产不计其数，她自己也有车，但是4年居然从来没有提过，一起AA制吃饭，收假我给她带了特产来，她来接我为了省钱转几次公交，我的天！在她的引荐下，她爸爸的公司给我们提供了就业的机会，大家都没好意思去，毕业后，她联系，我们再无回应

大学班上一个男生，长的黑不溜秋的，那时候我们都用智能手机了，他用着滑盖手机穿的特别朴素。知道有一次他爸来学校请了我们全班去学校周边最好的饭店吃饭，还带着男秘书开的车是两百多万的保时捷，后面慢慢的知道了他家里有公司还有餐饮很多行业，还有游艇。。。真的超级朴素还有点土。

09年的时候在恒大的售房部上班，当时一个大概五十多岁的男性领了一个七八岁的小孩子穿的那真叫一个朴素，黑布鞋，老式的那种黑西裤，蓝衬衣。孩子穿的也是很老旧。一群人没一个上去接待的，我看了一会儿我过去了，就问他；是要租赁商铺还是买房。他的回答我惊呆了，要看别墅，结果当时全款付清两套别墅一共七百五十多万。

我们高中时候一个女生长得漂亮，他爸爸是我们学校的清洁工，那个时候我们不懂事很多同学喜欢开她玩笑，说老爸那个样为什么女儿生得这么漂亮，刚好他有个远房哥哥我刚好认识，他哥说她亲生父母生了她就给这个养父养了，因为那边女孩太多了，人家养父是做服装生意的，至少上亿，在我们老家那一带都是数一数二的，05年想认她，但她不想认他，就跟养父过了，12年她结婚亲生父母给她在成都买了一套别墅和一辆保时捷还有500w但是她也不要。嫁了一个老公还不错

转载请注明：游艇网 » 租用游艇问题(pascal)