Question

例1：运行下列程序后显示结果为_____

Answer 1

1：

CLEAR

C="南京大学信息管理系"

FOR I=1 TO LEN(C)/2

IF I%20 && 如果 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

这是一段统计全单字节字串中大写字母数的程序