写一个VI程序 ,输入学生语、数、英三门课成绩,计算平均分,根据平均分划分等级并输出:90-100为A级,60-89为B级,60以下为C级。
时间: 2024-10-16 07:08:42 浏览: 18
在编写一个简单的VI(Visual Basic for Applications)程序时,你可以按照以下步骤来实现这个功能:
```vb
Sub CalculateGrades()
'声明变量
Dim scoreChinese As Integer
Dim scoreMath As Integer
Dim scoreEnglish As Integer
Dim totalScore As Integer
Dim averageScore As Double
Dim grade As String
'提示用户输入成绩
Console.WriteLine("请输入学生的语文成绩:")
scoreChinese = InputBox("请输入分数")
Console.WriteLine("请输入数学成绩:")
scoreMath = InputBox("请输入分数")
Console.WriteLine("请输入英语成绩:")
scoreEnglish = InputBox("请输入分数")
'计算总分和平均分
totalScore = scoreChinese + scoreMath + scoreEnglish
averageScore = totalScore / 3
grade = "C" '默认等级
'根据平均分划分等级
If averageScore >= 90 Then
grade = "A"
ElseIf averageScore >= 60 And averageScore < 90 Then
grade = "B"
End If
'输出结果
Console.WriteLine("学生的平均分为: " & Format(averageScore, "0.00") & " 分,等级为: " & grade)
End Sub
```
运行上述程序后,用户会被提示依次输入语文、数学和英语的成绩,程序会自动计算总分和平均分,并根据条件确定等级。
阅读全文