一．程序设计题汇总
1. 通过输入学生的学号（字符型）查找学生，若找到该学生，先输出学号与姓名，然后输出
“英语”和“计算机实用技术”成绩。若找不到该学生输出“查无该生”。（设表文件“学生信息”满足题目需要）
set talk off
clear
use 学生信息
accept "请输入学生学号：" to xh
locate for 学号==xh
if !eof()
?学号,姓名
list fiel 英语,计算机实用技术 for 学号=xh
else
?"查无该生"
endif
use
2. 输入学生成绩，并要求：成绩小于 60 分时，输出“不及格”；成绩在 60～69 分之间时，输出
“及格”；成绩在 70～79 之间时，输出“中”；当成绩在 80～89 之间时，输出“良”；当成绩在 90～100 之间时，
输出“优”。
set talk off
clear
input "请输入成绩： " to cj
do case
case cj>=90
?"优秀"
case cj >=80
?"良好"
case cj >=70
?"中"
case cj >=60
?"及格"
case cj<60
?"不及格"
otherwise
?"数据有误"
评论1