题2 单表程序设计1摘要.docVIP

题2 单表程序设计 *------------------------------------------------------*【程序设计】 *------------------------------------------------------*题目：设表 RSDA.DBF 结构为：学号（C，5） ，姓名（C，6） ， * 职称（C，6）统计出 RSDA.DBF 表中职称为工程师的 * 人数。 （利用 DO WHILE……ENDDO 循环语句实现） 。 * 将人数存入变量 Y 中 * 请按照题目要求，在下面编写程序代码。 *------------------------------------------------------ SET TALK OFF SET LOGERRORS ON Y=-1 **********Program********** use rsda store 0 to s locate for 职称=工程师 do while not eof() s=s+1 continue enddo ?共有工程师+str(s,3)+名 use Y=S ********** End ********** DO YZJ9 WITH Y SET TALK OFF RETURN *---------------------------------