- 二一组卷

题型：填空题题类：常考题难易度：普通

浙教版初中信息技术九年级上学期期末试卷（11）

程序填空

用VB程序实现水仙花数，如果一个三位数等于它的每个数字的立方的和，则此数称为“水仙花数”，如153=1³+5³+3³ ，故153是水仙花数。求100~999之间的全部水仙花数

Private Sub Command1_Click()

Dim i, j, m, n As Integer

For

i = ´求百位上的数字

j = (n Mod 100) \ 10 ´求十位上的数字

m = n Mod 10 ´求个位上的数字

If Then

Print n; "="; i; "^3+"; j; "^3+"; m; "^3"

End If

Next n

End Sub

举一反三

下面程序执行后，x的结果为（）。

x=0

For i = 1 to 5

For j = i to 5

x=x+1

Next j

Next i

Print x

有如下程序段，该程序执行后，变量a的值为（）。

a=0

For i=1 To 2

For j=i To 2

For k=1 To j

a=a+2

Next k

Next j

Next i

以下程序实现，一个四位数，各位之和等于其前两位，各位之积各于其后二位，最后打印出该四位数，请补充完善该程序。

For {#blank#}1{#/blank#} to 9

For b=0 to 9

For c=0 to 9

For d=0 to 9

X={#blank#}2{#/blank#}

If {#blank#}3{#/blank#} then

print x

End if

Next d

Next c

Next b

Next a

有如下VB程序段：

s=1

for i=1 to 3

s=s+1

next i

该程序段运行后，变量s的值为( )

运行下列 Python程序，结果正确的是（）

s="abcdefg"

c=len(s) #len 求字符串长度

for i in range(0,c):

if i<2:

print (chr(ord(s[i])+2),end=" ") # ord()函数是chr()函数配对函数，将字符转ASCII值

else:

print(chr(ord(s[i]) + 3),end=" ")

《孙子算经》有个流传至今的数学问题叫“物不知数”，原文：今有物，不知其数，三三数之剩二，五五数之剩三，七七数之剩二，问物几何？意思是说∶有一堆物体不知道有几个，三个三个分组会剩下2个，五个五个分组会剩下3个，七个七个分组会剩下2个。问这些物体一共有几个？

我们假设这个数是X，也就是说X必须同时满足除3余2、除5余3、除7余2的条件。

现在要求用python解决“物不知数”问题，列举1000以内这样的数是哪些？有多少个？请补充代码，完善程序。

count=0

for number in range(1000):

if {#blank#}1{#/blank#}and number%7==2:

print("这个数是:",number)

{#blank#}2{#/blank#}

print("这样的数共有：",count,"个")

相关试卷

公司介绍

服务介绍

帮助中心