- 搜标题
- 搜题干
- 搜选项
填空题
下列程序的功能是：将字符串“abcde”逆序打印出来。请填写空白处以完善程序。
下列程序的功能是：将字符串“abcde”逆序打印出来。请填写空白处以完善程序。
Function rev(str1) As String
B=Mid(______,1, 1)
If B= "" Then
rev=""
Else
rev=rev(Mid(str1, 2)) +______
End If
End Function
Private Sub Form_Click()
old ="abcde"
Print rev(old)
End Sub
答案：
str1 b[解析] 本程序使用“递归”的思想，每次递归取出一个字符放到字符串的后面，然后以后面的字符串作为函数参数进入...
你可能感兴趣的试题
填空题
下列程序计算Sn的值。Sn=a+aa+aaa+…+aaa…a，其中最后一项为n个。
下列程序计算Sn的值。Sn=a+aa+aaa+…+aaa…a，其中最后一项为n个。
例如：a=5，n=4时，则Sn=5+55+555+5555。请在空白处填入适当的内容，将程序补充完整。
Private Sub Comnmnd1_Click()
Dim a As Integer，n As Integer，Cout As Integer
Dim Sn As Long，Tn As Long
Cout=1
Sn=0
Tn=0
a=InputBox(“请输入a的值：”)
n=InputBox(“请输入n的值!”)
Do
Tn=Tn * 10 + a
Sn=Sn+Tn
Cout=Cout+1
________
Debug. Print a，n，Sn
End Sub
答案：
Loop While Cout＜=n或
Loop Until Cout=n+1[解析] a和n的值必须已知，表...
Loop Until Cout=n+1[解析] a和n的值必须已知，表...
填空题
下列程序段的执行结果为______。
下列程序段的执行结果为______。
i=4
a=5
Do
i=i+1
a=a+2
Loop Until i＞=7
Print "A="；a
答案：
A=11[解析] 本段程序执行如下：第1次循环后：i=i+1=5; a=a+ 2=7：第2次循环后：i=i+1=6；a=...
填空题
数据模型按不同的应用层次分为三种类型，它们是 ________ 数据模型、逻辑数据模型和物理数据模型。
答案：
概念[解析] 数据模型按不同的应用层次分为三种类型，它们是概念数据模型、逻辑数据模型和物理数据模型。
概念数据...
概念数据...
填空题
下列程序的功能是：将数据1，2，…，8写入顺序文件Num.txt中，请将程序补充完整。
下列程序的功能是：将数据1，2，…，8写入顺序文件Num.txt中，请将程序补充完整。
Private Sub Form_Click()
Dim i As Integer
Open "Num.txt"For Output As#1
For i=1 To 8
________
Next
Close#1
End Sub
答案：
Print#1，i[解析] 使用Print语句可以将数据写入顺序文件中。
填空题
设某循环队列的容量为50，如果头指针front=45(指向队头元素的前一位置)，尾指针rear=10(指向队尾元素)，则该循环队列中共有______个元素。
答案：
15[解析] 计算队列中元素个数的公式为：(read-front+MAXQSIZE)%MAXQSIZE，其中MAXQSI...
填空题
以下程序段的输出结果是
________
。
以下程序段的输出结果是
________
。
num=0
Do While num＜=5
num=num+1
Loop
Print num
答案：
6[解析] 只要指定的条件为True，则会重复执行一系列的语句。本题中的循环只能当num的值超过5时才会终止，所以最终的...
填空题
下列程序的功能是：将字符串“abcde”逆序打印出来。请填写空白处以完善程序。
下列程序的功能是：将字符串“abcde”逆序打印出来。请填写空白处以完善程序。
Function rev(str1) As String
B=Mid(______,1, 1)
If B= "" Then
rev=""
Else
rev=rev(Mid(str1, 2)) +______
End If
End Function
Private Sub Form_Click()
old ="abcde"
Print rev(old)
End Sub
答案：
str1 b[解析] 本程序使用“递归”的思想，每次递归取出一个字符放到字符串的后面，然后以后面的字符串作为函数参数进入...
填空题
数据库系统中实现各种数据管理功能的核心软件称为 ________ 。
答案：
数据库管理系统或DBMS[解析] 数据库管理系统是数据库的机构，它是一种系统软件，负责数据库中的数据组织、数据操纵、数据...
填空题
要打印50个在-100～100之间不同的随机整数，并找出第几个是最大数。给定的程序不完整，将程序补充完整。
要打印50个在-100～100之间不同的随机整数，并找出第几个是最大数。给定的程序不完整，将程序补充完整。
Option Base 1
Private Sub Command1_Click()
Dim b()
Randomize
11
Do
x=Rnd
If x＞0.5 Then y=1 Else y=-1
t=y*Int(Rnd*100)+1
12
Do While k＜j
If t＜＞b(k) Then
k=k+1
Else
Exit Do
End If
Loop
If k=j Then
ReDim Preserve b(k)
b(k)=t
Print b(k)；
j=j+1
End If
Loop Until j＞50
Print
13
Max=b(1)
For n=2 To 50
If b(n)＞Max Then
14
p=n
End If
Next n
Print"最大数是："；Max
Print"位置在第"；p；"个"
End Sub
答案：
Max=b(n)[解析] 变量j是记录已产生数据的个数，变量k是查找是否有重复记录，变量p是记录最大数据的位置。在查找最...
