题目详情
当前位置:首页 > 职业培训考试
题目详情:
发布时间:2023-10-18 07:54:59

[单项选择]设执行以下程序段时依次输入1、3、5,执行结果为______ 。
Dim a(4)As Integer
Dim b(4) As Integer
For K=0 To 2
a(K+1)=Val(1nputBox(“请输入数据:”))
b(3-K)=a(K+1)
Next K
Print b(K)
A. 1
B. 3
C. 5
D. 0

更多"设执行以下程序段时依次输入1、3、5,执行结果为______ 。 D"的相关试题:

[单项选择]设执行以下程序段时依次输入2,4,6,执行结果为( )。   Dim a(4)As Integer   Dim b(4)AS Integer   For k=0 To 2     a(k+1)=Val(InputBox("Enter data:"))     b(3 - k) =a(k + 1)   Next k   Print b(k)
A. 2
B. 4
C. 6
D. 0
[单项选择]设执行以下程序段时依次输入2,4,6执行结果为
Dim a(4) As Integer,b(4) As Integer
For k =0 To 2
a(k + 1) = Val(InputBox( "Enter data:" ) )
b(3 - k) =a(k + 1)
Next
Print b(k)
A. 2
B. 4
C. 6
D. 0
[单项选择]执行下列程序段时,分别在输入框中输入2、4、6,则执行结果是______。
Dim A(4) As Integer
Dim B(4) As Integer
For i = 0 To 2
A(i + 1) = Val (InputBox (“请输入数据”))
B(3 - i) = A(i + 1)
Next i
Print B(i)
A. 2
B. 4
C. 6
D. 8
[单项选择]程序段如下: Dim i As Integer,s As Integer For i=4 To 1 Step-1 s=s+i Next i Print s,i执行的结果是( )。
A. 10 0
B. 9 1
C. 10 1
D. 9 0
[单项选择]有如下程序段: Dim str As String * 10 Dim i Str1=“abcdefg” i=12 len1=Len(i) str2=Right(str1,4) 执行后,len1和str2的返回值分别是( )。
A. 按要求显示部分查询记录
B. 消除重复出现的查询记录
C. 删除查询结果中符合条件的记录
D. 对查询结果进行排序
[单项选择]下列程序段执行后,执行的结果是______ 。
Dim M(10)
Dim N(10)
i=3
For j = 1 To 5
M(j) = j
N(i) = 2 * i + j
Next j
Print N(i); M(i)
A. 12 4
B. 11 3
C. 3 11
D. 10 2
[单项选择]以下程序段的执行结果是 ______。
Dim a As Integer,b As Integer
For a=4 To 1 Step-1
b=b+a
Next a
Print b, a
A. 100
B. 9 1
C. 10 1
D. 90
[单项选择]以下程序段的输出结果为
Dim 1,a(10),p(3)
k=5
For i=0 To 10
a(i)=i
Next i
For i=0 To 2
P(i)=a(i*(i+1))
Next i
For i=0 To 2
k=k+P(i)*2
Next i
Print k
A. 20
B. 21
C. 56
D. 32
[单项选择]执行以下程序段 Dim i As Integer, x As nteger x = 0 For i = 20 To 1 Step -2 Next x = x + i / 5 Print x 后,x的值为______。
A. 16
B. 17
C. 18
D. 19
[单项选择]有如下程序段:
Dim str As String*10
Dim i
Strl="abcdefg"
i=12
lenl=Len(i)
str2=Right(str1,4) 执行后,len1和str2的返回值分别是______。
A. 12,abcd
B. 10,bcde
C. 2,defg
D. 0,cdef
[单项选择]以下程序段的输出结果为( )。   Dim 1,a(10),p(3)   k=5   Fori=0 To 10     a(i)=i   Next i   For i=0 To 2     p(i)=a(i*(i+1))   Next i   For i=0 To 2     k=k+p(i)*2   Next i   Frint k
A. WHERE
B. FROM
C. GROUP BY
D. ORDER BY
[单项选择]下列程序段的执行结果为     Dim A(10,10)      For 1=2 To 4 For J=4 To 5 A(I,J)=I*J Next J Next I Print A(2,5)+A(3,4)+A(4,5)
A. 22
B. 42
C. 32
D. 52
[单项选择]有如下程序段:
Dim str As String*10
Dim i
Str1="abcdefg"
i=12
len1=Len(i)
str2=Right(str1,4)
执行后,len1和str2的返回值分别是______。
A. 12, abcd
B. 10, bcde
C. 2, defg
D. 0, cdef

我来回答:

购买搜题卡查看答案
[会员特权] 开通VIP, 查看 全部题目答案
[会员特权] 享免全部广告特权
推荐91天
¥36.8
¥80元
31天
¥20.8
¥40元
365天
¥88.8
¥188元
请选择支付方式
  • 微信支付
  • 支付宝支付
点击支付即表示同意并接受了《购买须知》
立即支付 系统将自动为您注册账号
请使用微信扫码支付

订单号:

请不要关闭本页面,支付完成后请点击【支付完成】按钮
恭喜您,购买搜题卡成功
重要提示:请拍照或截图保存账号密码!
我要搜题网官网:https://www.woyaosouti.com
我已记住账号密码