?/p>
Visual
FoxPro
程序设计实习教程与习题集?
《实习教程?/p>
?/p>
11
单元
程序设计初步
(
参考答?/p>
)
1
.编写一程序,计算并显示圆的周长
(L)
和面?/p>
(S)
,其中半?/p>
(R)
?/p>
INPUT
语句读入?/p>
SET
TALK
OFF
INPUT
'R:
'
TO
R
PI=3.1416
L=2*PI*R
S=PI*R^2
?
'L=',L
?
'S=',S
RETURN
2.
编写一程序,读入圆柱体的高
(H)
和底面半?/p>
(R)
,计算并显示圆柱体的体积
(V)
?/p>
SET
TALK
OFF
INPUT
'H:
'
TO
H
INPUT
'R:
'
TO
R
V=3.1416*R^2*H
?
'V=',V
RETURN
3.
编写一程序,首先由用户输入一个职务,如:
?/p>
科长
?/p>
?/p>
?/p>
处长
?/p>
等,然后显示数据?/p>
ZGGZ
.DBF
中所有该职务的职工记录?/p>
SET
TALK
OFF
USE
ZGGZ
ACCEPT
'
职务?/p>
'
TO
ZW
LIST
FOR
职务
=ZW
RETURN
《实习教程?/p>
?/p>
12
单元
分支结构的程序设?/p>
(
参考答?/p>
)