例1:运行下列程序后显示结果为_____CLEARC=”南京大学信息管理系”FOR I=1 TO LEN(C)/2IF I%20SUBS(C,2*I-1,2)ENDIFENDFOR例2:完善下列程序以显示7~1000以内能被7整除、且含有数字5的所有整数(例如35、、
来源:学生作业帮助网 编辑:六六作业网 时间:2024/12/26 05:08:27
例1:运行下列程序后显示结果为_____CLEARC=”南京大学信息管理系”FOR I=1 TO LEN(C)/2IF I%20SUBS(C,2*I-1,2)ENDIFENDFOR例2:完善下列程序以显示7~1000以内能被7整除、且含有数字5的所有整数(例如35、、
例1:运行下列程序后显示结果为_____
CLEAR
C=”南京大学信息管理系”
FOR I=1 TO LEN(C)/2
IF I%20
SUBS(C,2*I-1,2)
ENDIF
ENDFOR
例2:完善下列程序以显示7~1000以内能被7整除、且含有数字5的所有整数(例如35、、、、、、、、、、56、105等).
FOR n=7 TO 1000_______
ch= ______
IF “5” $ ch
ENDIF
ENDFOR
例3:完善下列程序,使程序的运行结果如右图所示.
CLEAR
FOR i=1 TO 9
FOR j=1 TO 9
IF i
例1:运行下列程序后显示结果为_____CLEARC=”南京大学信息管理系”FOR I=1 TO LEN(C)/2IF I%20SUBS(C,2*I-1,2)ENDIFENDFOR例2:完善下列程序以显示7~1000以内能被7整除、且含有数字5的所有整数(例如35、、
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
这是一段统计全单字节字串中大写字母数的程序