40for k = 6 to 2 step -2 循环 3 次,被执行 4 次 50 mk = k 共执行 4*3=12 次 60 print j , k 70 next k 80next j
90print j , k , mk13 0 2 11 、 如果事先不知道循环次数,如何用 for?next 结构来实现?
答:将循环终值设置得足够大,再在循环体内设置条件语句,满足 条件退出循环。 12、 利用循环结构,实现如下功能: (1)
s=0: for i =1 to 10
s = s + ( i+1)*(2*i+1) next i
(2)分别统计 1~100 中,满足 3 的倍数、 7 的倍数的数各是多少?0: s7 = 0 for i =1 to 100
if i mod 3 = 0 then s3 = s3 +1 if i mod 7 = 0 then s7 = s7 +1next i
(3)将输入的字符串以反序显示。例如,输入 “asdfghjkl ,”显示 “lkjhgfdsa 。”s = inputbox( ―请输入字符串 ‖) for i = len( s ) to 1 step -1print ( s, i, 1 )next i 13、 下面程序的运行结果是什么?该程序的功能是什么? private sub command1_click() 10100
将 20 转换成 2 进制数表示
s3 = mid
vb程序设计教程第四版课后答案.doc
40fork=6to2step-2循环3次,被执行4次50mk=k共执行4*3=12次60printj,k70nextk80nextj90printj,k,mk130211、如果事先不知道循环次数,如何用for?next结构来实现?答:将循环终值设置得足够大,再在循环体内设置条件
推荐度:
![](/skin/haowen/images/icon_star.png)
![](/skin/haowen/images/icon_star.png)
![](/skin/haowen/images/icon_star.png)
![](/skin/haowen/images/icon_star.png)
![](/skin/haowen/images/icon_star.png)
点击下载文档文档为doc格式