vfp程序题 需要详细解题思路和过程~~~谢谢谢谢

2024-12-15 21:23:36
推荐回答(2个)
回答1:

1:
CLEAR
C="南京大学信息管理系"
FOR I=1 TO LEN(C)/2
IF I%2<>0 && 如果 I 不能被 2 整除
??SUBS(C,2*I-1, 2) && 输出由 2*I-1 开始的双字节字符
ENDIF
ENDFOR

输出 “南大信管系”

等同:
CLEAR
C="南京大学信息管理系"
FOR I=1 TO LENC(C)
IF MOD(I,2)<>0
??SUBSTRC(C,I, 1)
ENDIF
ENDFOR

2:
FOR n=7 TO 1000 STEP 7 && 以步长 7 进行循环
ch= STR(n) && 先将 n 转换成字符型
IF "5" $ ch && 如果发现字符型 n 中包含 "5"
?n && 输出结果
ENDIF
ENDFOR

3:(看不到图)

4:
CLEAR
cstring= "VisualFoxPro"
nresult=0
m=len(cstring) && 获得字串 cstring 的长度
FOR n=1 to m
c=SUBSTR(cstring,n,1) && 顺序取 cstring 的 1 个字符
IF !BETWEEN(ASC(c), ASC("A"), ASC("Z")) && 如果 非大写 A—Z
LOOP && 不执行后续语句,继续循环
ENDIF
&& 如果通过(即 是大写字母),就计数
nresult=nresult+1
ENDFOR
? nresult && 输出结果

输出结果 3
这是一段统计全单字节字串中大写字母数的程序

回答2:

1、“南大信管系”
2、step 7 alltrim(str(n))
3、i*j
4、2