用inputbox输入一个班10个学生的成绩,要求10个学生的平均成绩,然后统计高于平均分的人数.用inputbox输入一个班10个学生的成绩,要求10个学生的平均成绩,然后统计高于平均分的人数.将10个学生

来源:学生作业帮助网 编辑:作业帮 时间:2024/04/29 01:10:42

用inputbox输入一个班10个学生的成绩,要求10个学生的平均成绩,然后统计高于平均分的人数.用inputbox输入一个班10个学生的成绩,要求10个学生的平均成绩,然后统计高于平均分的人数.将10个学生
用inputbox输入一个班10个学生的成绩,要求10个学生的平均成绩,然后统计高于平均分的人数.
用inputbox输入一个班10个学生的成绩,要求10个学生的平均成绩,然后统计高于平均分的人数.将10个学生的成绩、平均成绩、高于平均分的人数均显示在picture控件中.
Private Sub Form_Click()
Dim a(10),s,i,Avg,d
s = 0
d = 0
For i = 1 To 10
a(i) = InputBox("请输入第" & i & "个学生的成绩")
Picture1.Print a(i)
s = s + a(i)
Next i
Avg = s / 10
Picture1.Print Avg
For i = 1 To 10
If a(i) > Avg Then
d = d + 1
End If
Next i
Picture2.Print d
End Sub
哪里错了?

用inputbox输入一个班10个学生的成绩,要求10个学生的平均成绩,然后统计高于平均分的人数.用inputbox输入一个班10个学生的成绩,要求10个学生的平均成绩,然后统计高于平均分的人数.将10个学生
Private Sub Form_Click()
Dim a(10), s, i, Avg, d
s = 0
d = 0
For i = 1 To 10
a(i) = InputBox("请输入第" & i & "个学生的成绩")
Picture1.Print a(i)
s = s + a(i)
Next i
Avg = s / 10
Picture1.Print Avg
For i = 1 To 10
If a(i) +0> Avg Then ‘a(i)没转换前是字串,有可能比avg大,+0就是强制转换
d = d + 1
End If
Next i
Picture2.Print d
End Sub
程序上给你标注出来了

用inputbox输入一个班10个学生的成绩,要求10个学生的平均成绩,然后统计高于平均分的人数.用inputbox输入一个班10个学生的成绩,要求10个学生的平均成绩,然后统计高于平均分的人数.将10个学生 vb编写程序:一个具有10个元素的一维数组,下标从1到10,要求用inputbox从键盘上输入其元素值,并找出最小的那个数. 随机产生20个10~99之间的整数,要求:1) 用冒泡法排序(降序) 2) 用InputBox( )函数输入一整数X 随机产生20个10~99之间的整数,要求:1) 用冒泡法排序(降序) 2) 用InputBox( )函数输入一整数X 用辗转相除法求两数的最小公倍数和最大公约数 VBPrivate Sub Command1_Click()m = InputBox(输入第一个自然数)n = InputBox(输入第二个自然数) (1)Do While (2)m = n(3)r=m mod n LoopPrint 最大公约数为:; 要求用inputbox输入一个正实数,用msgbox输出它的平方和平方根,要求每个数保留三个小数. 要求用inputbox输入一个正实数,用msgbox输出它的平方和平方根,要求每个数保留三个小数. 用InputBox输入一个正整数,用Print方法在一行显示出他的平方根平方和立方根立方和 InputBox输入一个正实数,用Debug方法在一行上显示出它的平方和平方根、立方和立 vb求m+mm+mmm+...+mm...mmm(n个m)要求 n ,m值 用 inputbox输入Dim m%,n%,i%,j%,a(0 To 9999999) As IntegerPrivate Sub Form_Click()m = InputBox(请输入m值 )n = InputBox(请输入n值 )For i = n To 0 Step -1a(n) = a(n) + 10 ^ (i - 1)Next iPrin 用vbs排列一个包含5个元素的数组的大小,dim a(4),strfor i=0 to 4a(i)=inputbox(输入& i+1 &shu)NextDim tempFor i=0 To 4If a(i) 用电子表格EXCEL做一个程序,求四边形的周长和面积利用FUNCTION ,SUB,inputBox 输入2个边长,msgBox显示四边形的周长和面积 使用VB 6.0 制作一个程序,求1!+2!+3!+……+n!要求输入任意的N,求1到N的阶乘.用Inputbox 和Msgbox 用C语言,输入一个班10个学生的成绩,统计各分数段[0,60),[60,70),[70,80),[80,90),[90-100]的人数. VB试题:输入x,y,z三个数,按从小到大的次序显示.用InputBox函数输入3个数 vb 用inputbox函数输入3个任意整数,安从大到小顺序输出 (块if语句) 编写一个程序当单击窗体时用输入框(inputbox函数)输入一个自然数,判断是否“正数”“负数”或“0”,并邮箱ww11040202@163.com 我想要电子版的 VB用inputbox函数输入一个摄氏温度 根据华氏温度=9/5*摄氏温度+32算出华氏温度