程序填空题

1、读程序，请将程序补充完整。

X=0

CLEAR

DO WHILE .T.

@ 10,20 SAY “主菜单”

@ 11,22 SAY “1……输入数据”

@ 12,22 SAY “2……查询记录”

@ 13,22 SAY “3……统计记录”

@ 14,22 SAY “4……退出系统”

@ 15,22 SAY “请输入选择1……4：” GET X

_________①_________

DO CASE

CASE X=1

DO SUB1

CASE X=2

DO SUB2

CASE X=3

DO SUB3

CASE X= 4

__________②__________

ENDCASE

ENDDO

RETURN

2、下面程序的功能是利用参数传递求三个圆柱体体积。

*主观题 EX.PRG

CLEAR

FOR K=1 TO 3

INPUT“圆半径R=”TO R

INPUT“高H=”TO H

_______①______

DO SUBYZ______②_____

?”圆柱体V=”,INT(V）

ENDFOR

RETURN

*子程序 SUBYZ.PRG

PARA_____③______

V=3.14*R^2*H

RETURN