?/p>
Visual FoxPro
程序设计实习教程与习题集?
(
?/p>
2
?/p>
)
《实习教程?/p>
?/p>
1
单元
Visual FoxPro
基本操作
(
参考答?/p>
)
1
.利用对其赋值的方法,判定下列字符串是否为合法的内存变量名?/p>
1
?/p>
X1
?/p>
X(1
?/p>
?/p>
X*
?/p>
X
?/p>
?/p>
X_1
?/p>
1X
执行赋值命令:
X1=3
,或
STORE 3 TO X1
,系统没有任何错误显示,?/p>
X1
为合法的内存变量名?/p>
类似地,
X_1
也为合法的内存变量名,其余为不合法?/p>
2
)变量,?/p>
量,变量
X
,变?/p>
1
,变?/p>
_1
利用上面的方法可以判定:变量,变?/p>
X
,变?/p>
1
,变?/p>
_1
为合法内存变量名,其余不合法?/p>
2
.计算并显示下面各题的结果?/p>
1
)分别利用函?/p>
(MOD)
和运?/p>
(%)
,求?/p>
987654321
除以
123456789
的余数?/p>
利用函数?/p>
? MOD(987654321,123456789)
显示
: 9
利用运算?/p>
? 987654321%123456789
显示
: 9
2
)若
X=5.1249
,求
2
X
?/p>
X
2
的最小值?/p>
命令
: X=5.1249
? MIN(2^X,X^2)
显示
: 26.2646
3)
设:
a=1
?/p>
b=4
?/p>
c=3
,计算一元二次方程:
aX
2
+bX+c=0
的两个根?/p>
命令
: a=1
b=4
c=3
? (-b+SQRT(b^2-4*a*c))/(2*a)
显示
: -1.0000
? (-b-SQRT(b^2-4*a*c))/(2*a)
显示
: -3.0000
4
?/p>
?/p>
C1=
?/p>
AB
?/p>
?/p>
C2=SPACE(2
?/p>
?/p>
C3=str(3.14,5,2
?/p>
,且
A1=C1+C2+C3
?/p>
A2=trim(C1+C2-C3
?/p>
?/p>
A1
?/p>
A2
的长度?/p>
命令
: C1=
?/p>
AB
?/p>
C2=SPACE(2)
C3=STR(3.14,5,2)
A1=C1+C2+C3
A2=TRIM(C1+C2-C3)
?LEN(A1)
显示
:9
?LEN(A2)
显示
:7
5
)设
C1= SPACE(2
?/p>
?/p>
C2=
?/p>
ABC
?/p>
,C3=SPACE(3
?/p>
,且
A1=C1+C2+C3
?/p>
A2=trim(C1+C2+C3
?/p>
,
A3=ltrim(C1+C2+C3), A4=alltrim(C1+C2+C3)
?/p>
A1
?/p>
A2
?/p>
A3
?/p>
A4
的长度?/p>
命令
: C1=SPACE(2)
C2=
?/p>
ABC
?/p>
C3=SPACE(3)
A1=C1+C2+C3
A2=trim(C1+C2+C3)
A3=ltrim(C1+C2+C3)
A4=alltrim(C1+C2+C3)
?LEN(A1)
显示
:8
?LEN(A2)
显示
:5
?LEN(A3)
显示
:6
?LEN(A4)
显示
:3
6
)设
A=
?/p>
微型计算?/p>
?/p>
,利用函?/p>
SUBSTR
?/p>
A
表示字符?/p>
?/p>
微机
?/p>
?/p>
命令?/p>
A=
?/p>
微型计算?/p>
?/p>
? SUBSTR(A,1,2) + SUBSTR(A,9,2)
显示
:
微机