分析完善程序。
以下是求解一元二次方程ax2+bx+c=0(a≠0)的主要VB程序片段,请你补全代码:
a=Val(InputBox(“a=”))
b=Val(InputBox(“b=”))
c=Val(InputBox(“c=”))
d=________________________’求判别式d
If d>0 Then
x1=(-b+Sqr(d))/(2*a)
x2=(-b-Sqr(d))/(2*a)
Print “x1=”;x1
Print “x2=”;x2
End If
If ________________ Then
Print”x=”;-b/(2*a)
End If
If d<0 Then
Print “无实数解!”
End If
当前题号:1 | 题型:None | 难度:0.99
二进制数存储在字符串变量s中,使用“位权累加”法将二进制转换成十进制。结果存在整数变量ans中,整型变量ans初值为0。例如将二进制数“1001”存储在变量s中,下列能表示将最高位的“1”转换结果的VB语句是(   )
A.ans=ans+2^(len(s)-1)
B.ans=ans+2^(len(s)-2)
C.ans=ans+2^(len(s)-3)
D.ans=ans+2^(len(s)-4)
当前题号:2 | 题型:选择题 | 难度:0.99
VB表达式Int(Rnd*10)+54\9/3的值可能是(   )
A.18B.12C.28D.11
当前题号:3 | 题型:选择题 | 难度:0.99
如图所示,下面程序实现读取数据文件,进行可视化呈现,直观地展示了历年来报考研究生人数变化趋势。阅读程序回答问题:

(1)本程序中引用了第三方库,写出库名称,从代码中找出来。
(2)本程序读取了数据文件,文件名称是什么?
(3)读取数据文件的数据赋值到二维表型数据结构对象中,这个对象的名称是什么?
(4)本程序实现了数据可视化,呈现的图表为柱形图、折线图还是散点图?通过哪行代码来实现?
(5)本程序文件实现的图表的标题是什么?阅读程序,从其中找出来。
当前题号:4 | 题型:None | 难度:0.99
下列选项中,与表达式“m Mod n=0”等价的是(   )
A.m\n=Int(m/n)
B.m\n=m/n
C.mModn=m\n
D.m\n=Fix(m/n)
当前题号:5 | 题型:选择题 | 难度:0.99
已知x是一个五位数整数,下面语句中能得到其千位上的数字的是(   )
A.X/1 000B.x\1 000C.x\1 000 mod 10D.x mod 10 000\1 000
当前题号:6 | 题型:选择题 | 难度:0.99
已知a=-2,b=5,c=8,下列表达式的值为False的是(   )
A.a+b>b-c And a-c<a-b
B.a+c>b-c or Not b<c
C.a<c\b Or b>c And a<c
D.c mod a<a-b
当前题号:7 | 题型:选择题 | 难度:0.99
若x是大于0的偶数,则下列关系表达式的值一定为真的是(  )
①x Mod 2=0 ②x\2=0 ③x\2=x/2    ④Int(x/2) <>x/2
A.①②B.①②③C.①③D.①③④
当前题号:8 | 题型:选择题 | 难度:0.99
下列表达式的运算结果不等于8的是(   )
A.Len("2019选考")+Sqr(4)B.Abs(Int(-7.8))
C.Val(Mid("789",2,1))D.Asc("M")-Asc("e")
当前题号:9 | 题型:选择题 | 难度:0.99
下列能正确表示数学表达式100≥x≥1的VB表达式是(   )
A.100≥x And x≥1B.100>=x And x>1
C.x>=1 And x<=100D.x>=1 Or x<=100
当前题号:10 | 题型:选择题 | 难度:0.99