The code below is supposed to calculate the average for a student using 10 grades. It contains several errors. Rewrite the code using the correct naming conventions and turn in the full solution and discuss using this topic.
Dim arrGrades(10) as integer
Dim num,I, iAverage as Integer
For I = 1 to 10
Num = inputboxl(“Please enter a number”)
arrGrades(10) = num
next
iAverage = arrGrades(9) / 10
There are many programming languages. You're using Basic, which exists in many flavours. You may want to specify the name of the compiler (VB?) you're using.
1. An average is generally a floating point number, so it should not be defined as an integer.
2. Inputbox returns a string. You may want to convert it to an integer using CInt (or CDec)
3. There is no variable to accumulate the total marks.
4. Average is obtained by dividing the total by the number of marks (10).
5. next I is better than next by trying to avoid nesting errors.
6. There is no error trapping. For example, if the user types in an invalid number, there should be a check and have the user re-enter the value.
To rewrite the code correctly, we need to address the naming conventions and fix the errors. Here is the corrected code:
```vb
Dim arrGrades(10) As Integer
Dim num, i, iAverage As Integer
For i = 1 To 10
num = InputBox("Please enter a number")
arrGrades(i) = num
Next
iAverage = 0 ' Initialize the variable to accumulate the sum of grades
For i = 1 To 10
iAverage = iAverage + arrGrades(i)
Next
iAverage = iAverage / 10 ' Calculate the average by dividing the sum by the number of grades
MsgBox "The average grade is: " & iAverage
```
In this code, the naming conventions have been corrected:
- "arrGrades" is now in camel case format.
- "num" and "iAverage" are also in camel case format.
- "I" has been changed to "i" to comply with the conventional use of lowercase letters for loop variables.
The code now correctly initializes the "iAverage" variable to accumulate the sum of grades. It then calculates the average by dividing the accumulated sum by the number of grades (10 in this case). Finally, a message box displays the calculated average.