Найти средний балл ученика, если оценок неизвестное колличество - VB

Формулировка задачи:

работаю в vb6. точнее начала работать. в школе объяснили пару уроков куда что писать,дали цикл иф,поделали калькуляторы и все. задали проект. тема: электронный дневник. единственное,что не могу написать так это как найти средний балл ученика если оценок неизвествое колличество может быть. работала в паскаль абс,там такое делала через массив,а сейчас не совсем понимаю о чём речь. помогите!!(ввод оценок должен производится с клавиатуры)

Решение задачи: «Найти средний балл ученика, если оценок неизвестное колличество»

textual
                            Листинг программы 
                        
 
                        
                          
                    
Private Sub Command2_Click()
Cls
Dim i, a!(5), sa!
Print "Оценки"
For i = 1 To 5
 a(i) = InputBox("a(" & i & ")")
 Print a(i);
 sa = sa + a(i)
Next i
Print
Print "Средний балл = "; sa / 5
End Sub

Оцени полезность:

13 голосов , оценка 3.769 из 5

Нужна аналогичная работа?

Оформи быстрый заказ и узнай стоимость

Похожие ответы