第十四课 机器人巡逻 知识点题库

①设定⼀个理想数字比如：66，

②让⽤户输入数字，如果比66⼤，则显示：“你猜大了！”；

③如果⽐66小，则显示：“你猜小了！”；

④只有等于66，显示：“你才对了！”，并退出循环。

for i in range(1，10，4)：

    s=s+i

该程序段运行后，语句s=s+i执行的次数是(    )。

a=4

s=0

while a>=0：

    s=s+a

    a=a-1

print(s，a)

Dim s As long, x As Integer

s=0 : x=1

Do While (x<10)

    s=s+x

    x=x+2

Loop

Print s

 用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

for i in range(1， 10， 3):

    print(i， end="，")

for i in range（0,2）：

print（i）

s = 0

For i = 1 To 3

s = s + i

Next i

①   ②   ③   ④

Dim x As Integer

x=2

Do while x<=63

    x=(x+1)*(x-1)

Loop

Num=23

result=Num%3+5

print(result)

a=20

b=2

c=a**b+300

print(c)

for i in range(0,2)：

  print（i, end=" "）

for i in range(0,10,2)：

  print("*")

a1=int(input ("请输入自然数:"))

a2=int(input ("请输入自然数:"))

p=int(a1*a2)
print(p)

假如输入5和6，结果是（    ）