'用If..then..elseif
Dim w
w = InputBox(请输入重量：, 重量)
j = 0
If w > 50 Then
j = 20
ElseIf w > 30 Then j = 10
End If
If w = Then j = 0
MsgBox 行李托运费为： & j & 元
'用select case
Dim w
w = InputBox(请输入重量：, 重量)
j = 0
Select Case w
Case Is > 50
j = 20
Case Is > 30
j = 10
End Select
If w = Then j = 0
MsgBox 行李托运费为： & j & 元
'希望能帮到你
甲乙丙三人乘飞机，因行李超过免费的质量而分别支付18，30，42元的费用。三人的行李共重90千克。如果这些行李由一个携带，那么要付超重费210元。每千克行李费多少元? 丙的行李多少千克?
设可免费携带的行李重量为X千克 超过的行李每千克y元(90-x)*y=210 1
3*x+(18+30+42)/y=90 2
由1式得x=90-210/y
代入2式y=3
x=20
30万吨船吃水 空载吃水前部7米、后部9.5米,重载吃水20.85米,排水量12...
船舶吃水是指船舶在载重情况下浸入水中的深度(水线面与船底基平面之间的垂直距离)。由于船舶设计中和在使用过程中通常有纵倾情况，因此每种吃水又分为艏吃水、艉吃水、平均吃水三种。艏吃水是指船舶艏部吃水深度，艉吃水是指尾部吃水深度，平均吃水就是艏艉吃水平均值。
排水量吨位是船舶在水中所排开水的吨数，也是船舶自身重量的吨数
明白了吗？
10万吨的船吃水深度？
14米左右。
万吨级轮船的吃水深度一般为9米3左右,五万吨11.3米 ，十万吨14米左右.
吃水的大小不仅取决于船舶和船载所有物品，如货物、压载物、燃料和备件的重量，而且还取决于船舶所处水的密度。通过读取标在船艏和船艉的水尺，可以确定船舶的吃水。根据量取的方法不同，吃水可以分成实际吃水和型吃水两种。
10吨的船吃水也就50公分左右
什么是散货轮？
散货船，顾名思义，是装载散装货物的船舶。散装货物是裸装货物的一种，不能计数，无法包装，一般是指大宗的粮、矿、煤炭和石油等。而散货船，从船舱形状、结构到船体强度等，均是按照装载散装货物来设计的。 散货船分为干散货船和液散货船两大类。 干散货船根据船型分为好望角型（10万载重吨以上）、巴拿马型（7-9万载重吨）、大灵便型（4-5万载重吨）和灵便型四种（2-4万载重吨）。 液散货船又可以分为油轮、液化气船、液体化学气船、其他液散货船等。 油轮按照船型分为通用型（1万载重吨以下）；灵便型（1万—5万载重吨）；巴拿马型（6万—8万载重吨）；阿芙拉型（8万—12万载重涪袱帝惶郜耗佃同顶括吨）；苏伊士型（12万—20万载重吨）；超级油轮（VLCC，20万——30万载重吨）；特级油轮（ULCC，30万载重吨以上）。 液化气船分为LNG（液化天然气船）和LPG（液化石油气船）。 液体化学气船是运载醚、苯、酸、醇等液体的船舶。 其他液散货船有例如液体沥青船以及运输水的船等。
