VB算法设计打开'c:\MyExam\工程1.vbp'完成如下算法设计 请你为某汽车运输公司编制一个计算运输费
来源:学生作业帮 编辑:作业帮 分类:综合作业 时间:2024/05/03 00:32:39
VB算法设计
打开'c:\MyExam\工程1.vbp'完成如下算法设计 请你为某汽车运输公司编制一个计算运输费用的程序,运输费用的计算方法是距离愈远,每公里运价愈低,如下表所示: 距离s<500公里 折扣=0% 500=<s<1000 折扣=5% 1000=<s<3000 折扣=10% s>=3000 折扣=15% 如果运输的货物重为15吨,每吨运价为0.225元,请根据不同的运输距离计算出运费. 注:1.请勿更改main函数.2.请在函数func(c)中实现功能. 帮我写一下吧 好不好 不用做 只要把那些代码呀什么的全给我弄过来就好了 注意:一定是我将这个复制到程序里就可以直接得到我想要的结果的如果我满意的话 我会加分的 我保证
打开'c:\MyExam\工程1.vbp'完成如下算法设计 请你为某汽车运输公司编制一个计算运输费用的程序,运输费用的计算方法是距离愈远,每公里运价愈低,如下表所示: 距离s<500公里 折扣=0% 500=<s<1000 折扣=5% 1000=<s<3000 折扣=10% s>=3000 折扣=15% 如果运输的货物重为15吨,每吨运价为0.225元,请根据不同的运输距离计算出运费. 注:1.请勿更改main函数.2.请在函数func(c)中实现功能. 帮我写一下吧 好不好 不用做 只要把那些代码呀什么的全给我弄过来就好了 注意:一定是我将这个复制到程序里就可以直接得到我想要的结果的如果我满意的话 我会加分的 我保证
我写了一个函数,你看看符不符合你的要求,使用方法我也写在代码中:
'定义x为函数,其中x为价钱,zl是货物的重量,juli为货物运送的距离
Public Function x(zl As Integer, juli As Integer) As Single '使用方法是: x(货物重量,运送距离)
If juli < 500 Then '然后print x
x = zl * 0.225
ElseIf juli >= 500 And juli < 1000 Then
x = (zl * 0.225) * 0.95
ElseIf juli >= 1000 And juli < 3000 Then
x = (zl * 0.225) * 0.9
ElseIf juli > 3000 Then
x = (zl * 0.225) * 0.85
End If
End Function
'定义x为函数,其中x为价钱,zl是货物的重量,juli为货物运送的距离
Public Function x(zl As Integer, juli As Integer) As Single '使用方法是: x(货物重量,运送距离)
If juli < 500 Then '然后print x
x = zl * 0.225
ElseIf juli >= 500 And juli < 1000 Then
x = (zl * 0.225) * 0.95
ElseIf juli >= 1000 And juli < 3000 Then
x = (zl * 0.225) * 0.9
ElseIf juli > 3000 Then
x = (zl * 0.225) * 0.85
End If
End Function
帮忙设计一个C语言算法
设计要求 (1)先用C语言描述正确的计算最大公约数的算法 ,保证算法的正确性 (2)然后设计一个该算法的
长方体一个顶点出发的三条棱长为a,b,c,设计一个算法,计算线对角线的长.
C语言大作业 请设计一个算法完成两个超长正整数的加法.
你知道什么是素数吗,请你设计一个算法,判断6499是否为素数
设计一个计算10个数的平均数的算法
设计一个算法,计算1+3+5+7+…+99
设计一个函数,用来计算阶乘,不使用递归算法,
设计一个算法求a,b,c的最大值
有关算法的题有十件商品,设计一个算法,计算其平均价(文字表达)谢谢!
设计一个算法,求实数a的绝对值(VB编程)
设计一个算法,判断7是否为质数?