Найти средний балл ученика, если оценок неизвестное колличество - 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
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д