首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
【程序说明】从键盘输入学生的学号,在“成绩”表中计算该生的平均成绩,并说明成绩的档次(优、良、中、及格和不及格),如果该生不在表中则提示相应的信息。 【程序】 SET TALK OFF CLEAR USE 成绩 ACCEPT“请输入学生的学号:” TO X
【程序说明】从键盘输入学生的学号,在“成绩”表中计算该生的平均成绩,并说明成绩的档次(优、良、中、及格和不及格),如果该生不在表中则提示相应的信息。 【程序】 SET TALK OFF CLEAR USE 成绩 ACCEPT“请输入学生的学号:” TO X
admin
2010-06-18
74
问题
【程序说明】从键盘输入学生的学号,在“成绩”表中计算该生的平均成绩,并说明成绩的档次(优、良、中、及格和不及格),如果该生不在表中则提示相应的信息。
【程序】
SET TALK OFF
CLEAR
USE 成绩
ACCEPT“请输入学生的学号:” TO XH
(1)
IF (2)
?“查无此人!”
ELSE
(3) 成绩TO CJ FOR 学号=XH
DO CASE
CASE CJ>=90
DC=“优”
CASE CJ>=80
DC=“良”
CASE CJ>=70
DC=“中”
CASE CJ>=60
DC=“及格”
(4)
DC=“不及格”
ENDCASE
? XH,CJ,DC
ENDIF
USE
SET TALK ON
选项
A、FOUND()
B、! FOUND()
C、FIND()
D、! FIND()
答案
B
解析
查询结果函数的格式:FOUND([<工作区号>/<别名>])
功能:如果LOCATE,CONTINUE,SEEK,FIND命令执行成功(找到),则返回.T.,否则返回.F.。
记录查找结果,也可用EOF()来测试。如果记录找到,则EOF()为逻辑假(.NOT. EOF()为逻辑真),否则,EOF()为逻辑真。
本小题要求找不到学生的学号时,显示相应的提示信息,所以应是! FOUND()为真。
转载请注明原文地址:https://kaotiyun.com/show/ithZ777K
本试题收录于:
浙江省计算机二级VF题库浙江省计算机等级分类
0
浙江省计算机二级VF
浙江省计算机等级
相关试题推荐
ItisafactuniversallyacceptedthatBritonsdislikeimmigration.Sureenough,whentravelrestrictionsonRomaniansandBulga
WriteanessayaccordingtothefollowingrequirementsinChinese.Youshouldwriteabout150wordsonANSWERSHEET2.1.家长送学生参
ArtificialIntelligence(AI)istheabilityofamachinetodisplayhuman-likecapabilitiessuchasreasoning,learning,plann
输入n个整数,输出其中最小的k个。例如输入1,2,3,4,5,6,7和8这8个数字,则最小的4个数字为1,2,3和4。
求网格中的黑点分布(有6*7的网格,在某些格子中有黑点,已知各行与各列中有黑点的点数之和)
编码实现字符串转整型的函数(实现函数atoi的功能),据说是神州数码笔试题。如将字符串”+123”-->123,”-0123”-->-123,“123CS45”-->123,“123.45CS”-->123,“CS123.45”-->0
类CMyString的声明如下:classCMyString{public:CMyString(char*pData=NULL);CMyString(constCMyString&str);~CMyString(void);
数据库的优化设计?
请使用金山清理专家的“u盘病毒免疫工具”,启用c盘的自动播放功能。
利用“开始菜单”启动“磁盘碎片整理程序”
随机试题
简述图书出版者的义务。
复凝聚法制备微囊时所用的材料有()
下列属于运用收益法进行企业价值评估程序的有()。
()是指不法分子注册成立经销汽车的空壳公司,在无现货汽车可卖的情况下,以无抵押贷款为诱惑,吸引居民办理个人汽车贷款,以达到骗贷骗保目的。
集装单元化是通过(),来实现物流功能作业的机械化和自动化的。
下列拟定的公告标题中,正确的是()。
路线价估价法
全球性生态问题的出现,凸显了地理环境对社会发展的重要作用。下列观点正确的有
Whataretheytalkingabout?
Matchthephobicstateintheboxtothesymptomsbelow.ChooseyouranswersfromtheboxandwritethelettersA-Dnexttoq
最新回复
(
0
)