UC知道有关VFP程序设计题目
来源：百度知道 编辑：UC知道 时间：2024/05/18 03:22:49
1.自由表XS.DBF 有三个字段，分别是学号，姓名何成绩，统计90分以上学生人数。
M=0
USE XS
ENDIF
ENDDO
USE
RETURN
2.计算 M! / N!
CLEAR
INPUT "M=" TO M
INPUT "N=" TO N
? [ 5 ]
FUNCTION FACT
PARAMETERAS N
FACT=1
FOR [ 6 ]
[ 7 ]
ENDFOR
[ 8 ]
3.输入一个字符窜，要求分别统计出其中英文字母K1,空格K2,数字K3何其他字符K4的个数
CLEAR
ACCEPT TO CHAR1 &&输入CHAR1的值
STORE O TO K1,K2,K3,K4
N=[ 9 ]
FOR 1=1 TO N
C1=[ 10 ]
DO CASE
CASE [ 11 ]
K1=K1+1
CASE C1=SPACE(1)
K2=K2+2
CASE C1<="9" AND C1>="0"
K3=K3+1
[ 12 ]
K4=K4+1
ENDCASE
NEXT
?K1,K2,K3,K4
1.设BOOK表汇总
M=0
USE XS
ENDIF
ENDDO
USE
RETURN
2.计算 M! / N!
CLEAR
INPUT "M=" TO M
INPUT "N=" TO N
? [ 5 ]
FUNCTION FACT
PARAMETERAS N
FACT=1
FOR [ 6 ]
[ 7 ]
ENDFOR
[ 8 ]
3.输入一个字符窜，要求分别统计出其中英文字母K1,空格K2,数字K3何其他字符K4的个数
CLEAR
ACCEPT TO CHAR1 &&输入CHAR1的值
STORE O TO K1,K2,K3,K4
N=[ 9 ]
FOR 1=1 TO N
C1=[ 10 ]
DO CASE
CASE [ 11 ]
K1=K1+1
CASE C1=SPACE(1)
K2=K2+2
CASE C1<="9" AND C1>="0"
K3=K3+1
[ 12 ]
K4=K4+1
ENDCASE
NEXT
?K1,K2,K3,K4
1.设BOOK表汇总
2.
CLEAR
INPUT "M=" TO M
INPUT "N=" TO N
? fact(m)/fact(n)
FUNCTION FACT
PARAMETERS N
FACT=1
FOR i=1 to n
fact=fact*i
ENDFOR
RETURN fact
3.
CLEAR
ACCEPT TO CHAR1 &&输入CHAR1的值
STORE 0 TO K1,K2,K3,K4
N=LEN(char1)
FOR i=1 TO N
C1=SUBSTR(char1,i,1)
DO CASE
CASE (ASC(C1)>=65 AND ASC(C1)<=90) OR (ASC(C1)>=97 AND ASC(C1)<=122)
K1=K1+1
CASE C1=SPACE(1)
K2=K2+1
CASE C1<="9" AND C1>="0"
K3=K3+1
CASE (ASC(C1)>=123 AND ASC(C1)<=255) OR (ASC(C1)>=91 AND ASC(C1)<=96) OR (ASC(C1)>=58 AND ASC(C1)<=64)
K4=K4+1
ENDCASE
NEXT
?"字母数：",K1
?"空格数：",K2
?"数字数：",K3
?"其他字符数：",K4
1.数据库，dbc，？
2.locate for,go,goto,seek
4.
5.
6.create report,菜单新建，项目新建
7.list f