题目:从键盘输入一个表文件名,打开该表,查找”姓名”是”张东”的记录,并显示该记录,最后输出”姓名”是”张东”的记录个数。(设被打开的表中有固定字段”姓名”)P64SET TALK OFFACCEPT TO AUSE &A**********FOUND**********N=1SCAN FOR 姓名= “张东”**********FOUND**********LISTN=N+1ENDSCAN**********FOUND**********? 记录个数是,NUSESET TALK ON
查看答案
程序改错:打开表XSDB.DBF,统计姓张、姓王、姓李,三个姓的学生人数并将人数输出。星号下一行有错误,将正确答案的完整行写出来填写在题目下面相应的空白处。USE XSDBC=0***********FOUND**********LOCA 姓名="张".AND."王".AND."李"DO WHILE FOUN( )C=C+1***********FOUND**********COUNENDDO?CUSE
程序改错题:将一串ASCII码字符”ABC123”,逆序输出为:321CBA”。******FOUND******的下一行有错误,请将完整的正确答案填写在题目下面相应空白处。S=”ABC123”?S+”的逆序为:”***********FOUND**********L=STR(S)DO WHIL L>=1??SUBS(S,L,1)***********FOUND**********L=L+1ENDD
程序改错题:表XSDA.DBF结构为:学号(C,6),姓名(C,6),性别(C,2),入学成绩(N,6,2)。本程序实现按学号查找记录,直到输入”#”为止。******FOUND******的下一行有错误,请将完整的正确答案填写在题目下面相应空白处。SET TALK OFFUSE XSDA**********FOUND**********ACCEPT “请输入要查找的学号” ON XHDO WHILE XH!= “#”**********FOUND**********LOCATE FOR 学号=”CJ”IF FOUND( )?学号,姓名ELSE? “无此学号”ENDIFACCEPT “请继续输入要查找的学号” TO XH**********FOUND**********ENDFOR?”谢谢使用本查找系统”USESET TALK ON
题目:键盘输入X值时,求其相应的Y值* ┌ -1 (X<0)* │* Y=├ 0 (X=0)* │* └ 1 (X>0)SET TALK OFF**********FOUND**********ACCEPT “请输入一个数:” TO X**********FOUND**********DO WHILECASE X<0Y=-1CASE X=0Y=0**********FOUND**********DEFAULT X>0Y=1ENDCASE? YSET TALK OFF