试卷征集
加入会员
操作视频

用VB程序解答百鸡问题
我国古代数学家张丘建在“算经”里提出一个数学史上有名的百鸡问题。题曰:鸡翁一,值钱五;鸡母一,值钱三;鸡雏三,值钱一;百钱买百鸡,问鸡翁、母、雏各几何?
请把以下算法选项填入到程序语句相对应的位置:
设i、j、k分别代表鸡翁、鸡母、鸡雏的只数。首先确定i、j、k的取值范围:
A.若100个钱全买鸡母,则最多可买33只,即j的取值范围是0~33。
B.若100个钱全买鸡翁,则最多可买20只,即i的取值范围是0~20。
C.当i、j在各自的取值范围内确定某个值后,则鸡雏的只数,k=100-i-j也确定了。
D.让i从0变化到20,当i取某值时再让j从0变化到33,当j取某个值时,k的值也定了。如果i*5+j*3+k/3=100成立,则i、j、k当前的值就是答案。
先在窗体上绘制一个命令按钮,名称为Command1,编写命令按钮的单击事件。实现以上算法的程序如下:
Private Sub Command1_Click
(  )
(  )

For i=0 To 20 
20
20

For j=0 To 33 
33
33

k=100-i-j(
100-i-j
100-i-j

If i*5+j*3+k/3=100 Then 
If i*5+j*3+k/3=100 And i+j+k=100 Then
If i*5+j*3+k/3=100 And i+j+k=100 Then

Print“鸡翁、鸡母、鸡雏分别为“&i&”“&j&”“&k”只”
End if
Next j,i
End Sub
请计算出任意一种答案。鸡翁、鸡母、鸡雏分别有
4 18 78
4 18 78
只。

【考点】选择语句
【答案】(  );20;33;100-i-j;If i*5+j*3+k/3=100 And i+j+k=100 Then;4 18 78
【解答】
【点评】
声明:本试题解析著作权属菁优网所有,未经书面同意,不得复制发布。
发布:2024/6/27 10:35:59组卷:2引用:1难度:0.4
相似题
  • 1.编写程序查找字符串中最长连续相同字符的长度:

    横线处可选代码为:①h②h=0③h=h+1④Mid(s,i,l)=Mid(s,i+1,1)⑤Mid(s,i,1)=Mid(s,i-1,1),则①②③处语句依次为(  )

    发布:2025/1/2 10:30:2组卷:1引用:1难度:0.4
  • 2.下列选项中,与语句“Ifx>188 Then y=x*0.5 Else y=x*0.8“功能相同的是(  )

    发布:2025/1/2 10:30:2组卷:1引用:2难度:0.5
  • 3.有程序代码如下,输入某数据后,输出结果为“B”。那么输入的数据可能是(  )
    Dim score As Integer
    score=Val(InputBox(“score:“))
    If score>89 Then
        Print“A“
    Else
        If score>59 Then
            Print“B“
        Else
            Print“C“
        End If
    End If

    发布:2025/1/2 12:0:1组卷:0引用:1难度:0.6
深圳市菁优智慧教育股份有限公司
粤ICP备10006842号公网安备44030502001846号
©2010-2025 jyeoo.com 版权所有
APP开发者:深圳市菁优智慧教育股份有限公司| 应用名称:菁优网 | 应用版本:5.0.7 |隐私协议|第三方SDK|用户服务条款
广播电视节目制作经营许可证|出版物经营许可证|网站地图
本网部分资源来源于会员上传,除本网组织的资源外,版权归原作者所有,如有侵犯版权,请立刻和本网联系并提供证据,本网将在三个工作日内改正