分页:
上一页 1 2 3 4 5 6 7 8 [9] 10 下一页
(6)CLEA
(7)GO BOTTOM
(8)@10,10 SAY "编号:" GET 编号
(9)@ROW()+1,10 SAY "工作部门:" GET 工作部门
(10)@ROW+1,10 SAY "专业:" GET 专业
(11)@ROW()+1,10 SAY "职务职称:" GET 职务职称
(12)READ
(13)I=I+l
(14)ENDDO
(15)LIST
(16)USE
(17)SET TALK ON
(18)RETURN
8.通过调用过程文件计算圆的面积。
(l)SET TALK OFF
(2)SET PROC TQ CPPRG
(3)S=0
(4)INPUT "输入圆的半径:" TO R
(5)DO S1
(6)? S
(7)SET pROC TO
(8)RETURN *CPPRG
(9)PROC S1
(10)PARA X,R
(11)X=3.14*R*R
(12)RETU
五、程序设计题(本大题共2小题,每小题5分,共10分)
编写程序输出0---100之内的素数。
将ZK库中每一个职工的编号,工作部门,专业,职务职称在屏幕上显示出来。 要求在第4行显示字段名,第6行开始显示记录内容。
■二级Foqro样卷(三)参考答案
一、单项选择
21.D 22.B 23.B 24.A 25.C 26.D 27.B 28.B 29.C 30.A
二、阅读程序
1.4.00 36.00 100.00
2.Y=7
3.M=112
4.王伟 财会 会计师 920.00
5.2
6.4 3101 袭伟莉
7.张吉非
8.AAAAB
三、完善程序
1.①"ZG"+STR(I,1) ②PACK
2.①ON 编号 ②FIELD 编号,姓名,B.职务职称
3.①A=工资 ②SKIP
分页:
上一页 1 2 3 4 5 6 7 8 [9] 10 下一页