• 新浪微博:
  • 微信 :
按键精灵电脑版
立即下载

软件版本:2014.06
软件大小:22.9M
更新时间:03-18

按键精灵安卓版
立即下载

软件版本:3.3.6
软件大小:62.5M
更新时间:01-16

按键精灵iOS版
立即下载

软件版本:1.6.0
软件大小:29.2M
更新时间:07-29

最新企业版UiBot
立即下载

软件版本:3.3
软件大小:282M
更新时间:08-06

快捷导航

登录 后使用快捷导航
没有帐号? 注册

登录 注册
发新话题 回复该主题

[认证提问] 请问你们阅卷的是否认真看题啊,答案正确的给我阅错 [复制链接]

1#
有根长度600cm钢筋,要截成长度分别为69cm、39cm、29cm三种规格的短料在三种短料至少各截1截的前提下,如何截取才能使剩余材料最少?


麻烦看清楚题目啊,在三种短料至少各截1截的前提下,如何截取才能使剩余材料最少!!


什么叫使剩余材料最少??意思是有可能材料有剩余啊!我答案是69*6 + 39*4 + 29*1 = 599 ,599+剩余的1cm = 600cm 这个有问题?
评卷的居然给我评一个计算之后总和为599cm,还不够600,我服了,因为还剩了1cm的剩余材料啊,你们这算术过关吗?
哪有可能那么巧,刚好不剩材料?那这个题目还考什么呢






这个有错吗??没看到剩余材料1,这个你们都不加进去,服了

看我自己的答案,大家评评理,你们评卷的似乎有点不认真啊。。。
  1. //有根长度600cm钢筋,要截成长度分别为69cm、39cm、29cm三种规格的短料在三种短料至少各截1截的前提下,如何截取才能使剩余材料最少?
  2. TracePrint 600 \ 69 '整除 69最多8根
  3. TracePrint 600 \ 39 '整除 39最多15根

  4. Dim N69, N39, N29 '循环用变量
  5. Dim A(3) '记录三个值
  6. Dim jilu '记录
  7. jilu = 600 '默认剩余记录600cm
  8. For N69 = 1 To 8
  9. For N39 = 1 To 15
  10. if (69*n69 + 39*n39)<600 then '总长不能超过600
  11. dim temp
  12. temp = (600 - 69*n69 - 39*n39) mod 29 '用29cm的短料求余
  13. if temp < jilu then '刷新记录
  14. jilu = temp
  15. a(1) = n69
  16. a(2) = n39
  17. a(3) = (600 - 69 * n69 - 39 * n39) \ 29 '整除29
  18. end if
  19. end if
  20. Next
  21. Next
  22. TracePrint "69cm: " & A(1) & "截"
  23. TracePrint "39cm: " & A(2) & "截"
  24. TracePrint "29cm: " & A(3) & "截"
  25. TracePrint "剩余材料" & jilu & "cm"
复制代码

    已有1评分我要评分查看所有评分

    最后编辑finall 最后编辑于 2017-09-13 12:29:06
    承接各类网页、办公、网游、鼠键脚本制作。

    接单QQ:766888865

    点击这里联系我
    2#

    For i=1 to 600 / 69
        For j = 1 To 600 / 39
            n = 600 mod (69 * i + 39 * j)
            If n=0 Then
                TracePrint "OK"
                TracePrint i
                TracePrint j
            End If
        Next
    Next

    3#

    ..0.0..

    最后编辑zj836148036 最后编辑于 2017-09-14 13:24:01
    4#

    For i=1 to 600 / 69
        For j = 1 To 600 / 39
            n = 600 mod (69 * i + 39 * j)
            If n=0 Then
                TracePrint "OK"
                TracePrint i
                TracePrint j
            End If
        Next
    Next

    5#

    数学题 停难的

    答案是 有个是偶数 两个是奇数 这样组组合 答案就会是偶数 不知道对你有帮助吗

    最后编辑lcxiaofu 最后编辑于 2017-09-14 23:10:34
    有事就QQ 136874377 QQ交流群300857068   接各种脚本定做 价格优惠
    6#

    我只看看!不说话。

    努力通过认证6级!
    7#

    我觉得根数是6,4,1,剩余1cm是对的。有算得最后剩余0cm,根数是0,2,18的,但这种不符合三种最少都有1根的题意。
    Dim a,b,c,sy,a1,b1,c1,zx
    sy=600
    zx=600
    For a=1 to 20
    For b=1 to 20
    For c=1 to 20
    sy = 600-69*a-39*b-29*c
    If sy>=0 and sy<zx Then
    zx=sy
    a1=a
    b1=b
    c1=c
    End If
    Next
    Next
    Next
    Traceprint "剩余是:"&zx
    Traceprint "69的是:"&a1
    Traceprint "39的是:"&b1
    Traceprint "29的是:"&c1

    最后编辑wsfxxa 最后编辑于 2017-09-21 19:27:48
    8#


    最后编辑wsfxxa 最后编辑于 2017-09-27 17:33:09
    9#

    这太正常了,按键问答题题干只要是涉及数学描述的,基本上都存在有歧义或不严谨的地方。这时候思路已经不是最重要的了,重要的是揣摩出题人意图和阅卷人的脑足的标准答案。

    10#

    结果是正确的。
    在穷举的过程中可以优化。
    比如在n69在取到8的时候,n39范围已经很小 可以是一个跟n69有关的数(我只能说这些了)。
    严格意义上讲,你的穷举浪费了很多运算,无效运算比有效有效运算多不少。

    11#

    m = 0
    n=600
    For x = 1 To 9
        For y = 1 To 16
        For z=1 to 20
            If 69 * x + 39 * y + 29*z <= 600 Then
                TracePrint "截取69cm的" & x & "段,截取39cm的" & y & "段,截取29cm的" & z & "段,剩余" & 600 - (69 * x + 39 * y + 29 * z) & "cm"
                m = 600 - (69 * x + 39 * y + 29 * z)
                If n > m Then
                n=m
                    a = x
                    b = y
                    c = z
                    
                End If
            End If
        Next
        Next
    Next
    TracePrint "截取69cm的" & a & "段,截取39cm的" & b & "段,截取29cm的" & c & "段,剩余" & 600 - (69 * a + 39 * b + 29 * c) & "cm"
    '我也是新手,不知道这样好不好

    12#

    Dim a,b,c,q,js,pd,i,ii,iii,fn,fni,z
    q = 1200
    a = 69
    b = 39
    c = 29
    pd = q+1
    fni = 0
    For i = 1 To int(q/a)
    For ii = 1 To int(q/b)
    For iii = 1 To int(q / c)
    z = q - i * a - ii * b - iii * c
    If pd >= z and z >= 0 Then
    If pd = z Then
    fni=fni+1
    fn =fn& " + 方案 " & fni & " : 69=" & i & "根 39=" & ii & "根 29=" & iii & "根"
    Else
    fni=1
    fn = " 方案 " & fni & " : 69=" & i & "根 39=" & ii & "根 29=" & iii & "根"
    End If
    pd = z
    ElseIf z < 0 Then
    Exit For
    End If
    Next
    Next
    Next
    TracePrint fn
    TracePrint "共" & fni & "方案," & "余料: " & pd
    //我觉得应该楼主考虑>600就退出循环,
    //方案应该有很多种,比如 材料=1200的时候就会有很多方案

    最后编辑kangbideca 最后编辑于 2017-10-19 22:41:13
    13#

    回复 2楼lcxiaofu的帖子

    好吧 谢谢

    承接各类网页、办公、网游、鼠键脚本制作。

    接单QQ:766888865

    点击这里联系我
    14#

    回复 8楼kangbideca的帖子

    好吧 谢谢

    承接各类网页、办公、网游、鼠键脚本制作。

    接单QQ:766888865

    点击这里联系我
    15#

    回复 2楼lcxiaofu的帖子

    好吧 谢谢!~

    承接各类网页、办公、网游、鼠键脚本制作。

    接单QQ:766888865

    点击这里联系我
    16#

    回复 7楼幸福VS遗忘的帖子

    欢迎讨论

    承接各类网页、办公、网游、鼠键脚本制作。

    接单QQ:766888865

    点击这里联系我
    17#

    回复 3楼178826559的帖子

    好吧 欢迎

    承接各类网页、办公、网游、鼠键脚本制作。

    接单QQ:766888865

    点击这里联系我
    18#

    回复 12楼finall的帖子

    不说了,我考试的结果也很让人不爽

    19#

    感谢楼主给我赚积分的机会。

    ---------------------5年多的编程经验,专业定制pc、安卓、模拟器脚本。
    -
    ---------------------经济实惠有偿解决按键精灵基础问题。
    -
    ---------------------联系QQ:3277595608
    20#

    中文沒學好!~哈哈我也遇到過

    [color=Red][b] 承接各类游戏脚本制作,[color=Blue]post[/color],手游,[color=Blue]端游[/color],办公,[color=Blue]自动化[/color]

    有偿解决任何按键基础问题(可远程讲解、教会为止)
    [color=Black]如果我的回答能帮助了你,大家可以加个好友互相了解[/color]
    接单QQ : 363759554[/b][/color] [img]http://wpa.qq.com/pa?p=1:363759554:10[/img]
    发新话题 回复该主题