【精选】VFP程序改错.docVIP

*题目：表XSDA.DBF结构为：学号（C，6），姓名（C，6），性别（C，2），入学成绩（N，6，2）。本程序复制表XSDA的记录到表XS1中，在表XS1中查找入学成绩550分以上的同学，将其删除并浏览XS1的内容。 SET TALK OFF USE XSDA **********FOUND********** COPY STRUCTURE TO XSDA USE XS1 **********FOUND********** LOCATE ALL 入学成绩=550 DO WHILE FOUND() DELETE **********FOUND********** LOOP ENDDO PACK BROW USE SET TALK ON 答案： 1). COPY★ TO ★XS1 2). ★LOCATE★ ALL★ FOR 入学成绩=550 或 ★LOCATE★ ALL ★FOR 550★=入学成绩 3). CONTINUE *题目:输入10，计算s=1+1+2+1+2+3+...+1+2+3+4+...+10 * 请在屏幕上输出结果。 set talk off clear ***********FOUND********** s=p=0 for i=1 to 10 ***********FOUND********** p=p-i s=s