vb编程,步骤详解有一根长度为546米的钢材料,要将它截取成两种规格a、b的长度分别为19米和28米
答案:2 悬赏:0 手机版
解决时间 2021-02-03 18:26
- 提问者网友：精神病院里
- 2021-02-02 23:40
vb编程,步骤详解有一根长度为546米的钢材料,要将它截取成两种规格a、b的长度分别为19米和28米
最佳答案
- 五星知识达人网友：傲气稳了全场
- 2021-02-03 00:45
Dim p As Integer, q As IntegerDim i As Integer, j As Integer,n as integer'有一根长度为546米的钢材料,要将它截取成两种规格a、b的长度分别为19米和28米的短料,'每种至少1段,问分隔成a,b各多少段后,剩余的残料r最少?编程解决此计算问题.For i = 1 To Int(546 / 19)' For j = 2 To Int(546 / 28) If (546 - 19 * i) Mod 28 p = i: q = (546 - 19 * i) / 28 End Ifn=546-19*p-28*q'NextNextPrint p, q,n '输出 27 1 5
全部回答
- 1楼网友：举杯邀酒敬孤独
- 2021-02-03 00:59
我学会了
我要举报
如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
点此我要举报以上问答信息
大家都在看
推荐资讯