超星 - do while循环程序改错 - 查题吧

简答题

题目：表XSDA.DBF结构为：学号（C，6），姓名（C，6），性别（C，2），入学成绩（N，6，2）。本程序实现按学号查找记录，直到输入”#”为止。SET TALK OFFUSE XSDAFOUNDACCEPT “请输入要查找的学号” ON XHDO WHILE XH!= “#”FOUNDLOCATE FOR 学号=”CJ”IF FOUND( )?学号,姓名ELSE? “无此学号”ENDIFACCEPT “请继续输入要查找的学号” TO XHFOUNDENDFOR?”谢谢使用本查找系统”USESET TALK ON

简答题

题目：打开表XSDB.DBF,统计姓张、姓王、姓李,三个姓的学生人数并将人数输出。USE XSDBC=0*****FOUNDLOCA 姓名="张".AND."王".AND."李"DO WHILE FOUN( )C=C+1*FOUND****COUNENDDO?CUSE

简答题

题目：统计RSH.dbf中职称是教授、副教授、讲师和助教的人数。USE RSH*****FOUNDSTORE 1 TO A , B , C , DDO WHILE .NOT.EOF ( )DO CASECASE 职称 = “教授”A = A + 1CASE 职称 = “副教授”B = B + 1CASE 职称 = “讲师”C = C + 1CASE 职称 = “助教”D = D + 1ENDCASE*FOUND****NEXT 1ENDDOUSE? A,B,C,D

简答题

题目：将一串ASCII码字符”ABC123”，逆序输出为：321CBA”。S=”ABC123”?S+”的逆序为：”*****FOUNDL=STR(S)DO WHIL L>=1??SUBS(S,L,1)*FOUND****L=L+1ENDD

简答题

题目：通过字符串变量操作先竖向显示”伟大祖国”，再横向显示”祖国伟大”。P64STORE “伟大祖国”TO XYCLEA*****FOUNDN=0DO WHILE N<8?SUBS(XY,N,2)N=N+2ENDDO?*FOUND****??SUBS(XY,4,4)??SUBS(XY,1,4)

1