[多项选择]有一个一维数组，内放10个学生成绩，写一个函数，求出平均分。

更多"有一个一维数组，内放10个学生成绩，写一个函数，求出平均分。"的相关试题:

[填空题]假定一个一维数组的定义为“char a[8],b；”若把该数组最后一个元素赋值给b应该采取的表达式为：【7】。

查看答案

[填空题]假定一个一维数组的定义为"char a[8]，b；"若把该数组最后一个元素赋值给b，应该采取的表达式为：______。

查看答案

[填空题]执行命令DIMENSION M(4，5)后，如果以一维数组的形式访问该二维数组，则一维数组元素M(7)与二维数组元素【7】为同一个变量。

查看答案

[填空题]下面的程序代码实现将一个一维数组中元素向右循环移动，移动次数由文本框Text1输入。例如数组各元素的值依次为0，1，2，3，4，5，6，7，8，9，10；移动三次后，各元素的值依次为8，9，10，0，1，2，3，4，5，6，7。
Private Sub MoveRight(x（　）As Integer)
Dim i As Integer
Dim j As Integer
Dim k As Integer
i＝UBound(x)
j＝x(i)
For k＝i To 【9】 Step—1
【10】
Next k
x(LBound(x))＝j
End Sub
Private Sub Command1_Click（　）
Dim a(10) As Integer
Dim i As Integer
Dim j As Integer
Dim k As Integer
For i＝0 To 10
a(i)＝i
Next i
j＝Val(Text1.Text)
k=0
Do
k＝k+1
Call MoveRight(a)
Loop Until k＝j
For i=0 To 10
Print a(i);
Next i
End Sub

查看答案

[填空题]下面的程序代码实现将一个一维数组中元素向右循环移动，移位次数由文本框Text1输入。例如数组各元素的值依次为0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10; 移动三次后，各元素的值依次为 8, 9, 10, 0, 1,2 3,4,5,6,7。
Private Sub MoveRight (x（　） As Integer)
Dim i As Integer
Dim j As Integer
Dim k As Integer
i = UBound (x)
j = x(i)
For k = i To 【7】 Step -1
【8】
Next k
x(LBeund(x)) = j
End Sub
Private Sub Command1_click（　）
Dim a(10) As Integer
Dim i As Integer
Dim j As Integer
Dim k As Integer
For i = 0 To 10
a(i) = i
Next i
j = Val(Text1. Text)
k=0
Do
k=k+1
Call MoveRight(a)
Loop Until k = j
For i = 0 To 10
Print a(i);
Next i
End Sub

查看答案

[填空题]

下面的程序代码实现将一个一维数组中元素向右循环移动，移位次数由文本框Text输入。例如数组各元素的值依次为0，1，2，3，4，5，6，7，8，9，10；移动三次后，各元素的值依次为8，9，10，0，1，2，3，4，5，6，7。
Private Sub Moveright(x（　）As Integer)
Dim i As Integer
Dim j As Integer
Dim k As Integer
i=UBound(x)
j=x(i)
For k=i To (6) Step-1
(7)
Next k
x(LBound(x))=j
End Sub
Private Sub Command1_Click（　）
Dim a(10)As Integer
Dim i As Integer
Dim j As Integer
Dim k As Integer
For i=0 To 10
　　a(i)=i
Next i
j=Val(Text1.Text)
k=0
Do
k=k+1
Call MoveRight(a)
Loop Until k=j
For i=0 To 10
　　Print a(i)；
Next i
End Sub

查看答案

我来回答:

提交