输入10个单精度数,统计其中正、负和零的个数。
第1题:
统计数据块中正数和负数个数(设有7个数,分别为-23,57,82,-27,-19,0,-8),要求写出完整程序框架。
第2题:
编写程序,从键盘输入十个数,然后提出其中的最大值和最小值。
第3题:
在窗体中有一个命令按钮Command1,对应的事件代码如下:
运行以上事件所完成的功能是( )。
A. 对输入的10个数据求累加和
B. 对输入的10个数据求各自的余数,然后再进行累加
C. 对输入的10个数据分别统计有几个是整数,有几个是非整数
D. 对输入的10个数据分别统计有几个是奇数,有几个是偶数
第4题:
阅读下面的程序,当输入分别为111和222时,程序输出为 ______。 n1=InputBox(”请输入第一个数:”) n2=Val(1nputBox("请输入第二个数:")) Print n1+n2
A.111222
B.222
C.333
D.程序出错
第5题:
执行以下程序段,如果在对话框中输入8,输出结果是"Hello"的是______。
A.n = InputBox("请输入一个数") Select Case n Case 7 To 1 Print "Hello" End Select
B.n = InputBox("请输入一个数") Select Case n Case Is>1, Is < 6 Print "Hello" End Select
C.n = InputBox("请输入一个数") Select Case n Case Is > 5, 1, 3 To 10 Print "Hello" End Select
D.n=InputBox("请输入一个数") Select Case n Case 1, 5, Is > 9 Print "Hello" End Select
第6题:
A、整型数
B、长整型数
C、单精度实型数
D、双精度实型数
第7题:
第8题:
编程:输入5个数,输出其中最大的数。
第9题:
对下面这段代码分析您输入的字符数为正确的是() function count( ) { var len=form1.text.value.length; alert(“”+len+”个”) }
第10题:
从一个数第一个数开始,直到最后边的一个非零数字,都称为这个数的有效数字。()
第11题:
第12题:
产生一个大于或等于0小于1的单精度随机数
产生一个大于或等于0小于10的单精度随机数
产生一个大于0小于10的单精度随机数
产生一个大于0小于1的单精度随机数
第13题:
下列说法正确的是( )
A 整数就是正整数和负整数 B 负整数的相反数就是非负整数
C 有理数中不是负数就是正数 D 零是自然数,但不是正整数
第14题:
窗体中有命令按钮run34,对应的事件代码如下:
Private Sub run34_Enter()
Dim num As Integer,a As Integer,b As Integer,i As Integer
For i=1 To 10
num=InputBox(“请输入数据:”,“输入”)
If Int(num/2)=num/2 Then
a=a+l
Else
b=b+1
End if
Next i
MsgBox(“运行结果:a=“&Str(a)&”,b=”&Str(b))
End Sub
运行以上事件过程,所完成的功能是( )。
A.对输入的10个数据求累加和
B.对输入的10个数据求各自的余数,然后再进行累加
C.对输入的10个数据分别统计奇数和偶数的个数
D.对输入的10个数据分别统计整数和非整数的个数
第15题:
阅读下面的程序: n1=InputBox(“请输入第一个数:”) n2=InputBox(“请输入第二个数:”) Print n1+n2 当输入的数分别为111和222时,程序输出______。
A.111222
B.222
C.333
D.程序出错
第16题:

/**/a=b=0;/**/
W.hile(/**/n!=0/**/)
E.lse/**/b++;/**/
第17题:
现在有负无限值双精度浮点数x和负有限值单精度浮点数y,以下关于x%y的说法中,______是正确的。
A.NaN
B.负无限双精度浮点数
C.负有限双精度浮点数
D.负无限单精度浮点数
第18题:
以下程序统计从终端输入的字符中大写字母的个数。用号作为输入结束标志,请填空。

第19题:
第20题:
编一个程序,从键盘输入一个字符串,用foreach循环语句,统计其中大写字母的个数和小写字母的个数。
第21题:
输入一个数,判断该数是否能被5整除? 要求:采用switch语句实现。
第22题:
随机函数Rnd(10)的功能为()。
第23题:
第24题: