- 1、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
- 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
- 4、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
- 5、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们。
- 6、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
- 7、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
二循环结构程序设计
1、数学表达式
1)For循环(循环次数已知)
循环变量初值、终值以及步长值都很明确
(1)、求1到100之内能被5整除的数之和。
(2)、求1到100之间的偶数之和。
(3)、求1到100之间的奇数之和。
(4)、。
(5)、s=的和。
(6)、s=的和。
(7)、。
4题程序为:
clear
s=0
for i=1 to 100
s=s+i^(1/3) 5题此句改为:s=s+i^(1/2)
next 6题上句改为:s=s+1/i
?”s=”,s
cancel
(8)、求并显示Fibonacci数列的前20项,其中Fibonacci数列定义为:1,1,2,3,5,8…
Clea
A=1
B=1
? a,b
For i=3 to 20
T=a+b
?? t
A=b
B=t
Next
canc
2)Do While循环(循环次数未知,但知道循环的控制结束的条件,就只能用do while循环)
(1).
clear
s=0
b=1
i=1
do while 1/i=1e-6
s=s+b*1/i
i=i+2
b=b*(-1)
enddo
? ”s=”,s
Cancel
2、初等数论
1)数的整除
(1)求1到n(包括n)之间能被5或9整除的所有自然数的倒数之和。
(2)求1到n之间(包含n)能被7或11整除的所有整数之和。
(3)有一整数(小于30000):它不是2的倍数,而是5的倍数,用3除它余1,用7除它余4,编程求所有满足此条件的数。
此类题模板:
clear
input “n=” to n
s=0
for i=1 to n
if i%5=0 or i%9=0
s=s+1/i
endif
next
?”s=”,s
Cancel
2). 素数问题(质数问题)
(1)、输入一个正整数,判断该数是否为素数。
(2)、输出100到200之间所有的素数,并求他们的个数,以及平方根之和。
模板:
clear
s=0
for i=100 to 200
f=.T.
for j=2 to i-1
if i%j=0
f=.F.
exit
endif
next
if f=.T.
s=s+sqrt(i)
endif
next
?s
cancel
3).拆分数字问题
(1)、输入一个整数,判断该整数是几位数。clear
input “输入一个整数” to n
s=0
do while n!=0
s=s+n%10
n=int(n/10)
enddo
?”s=”,s
cancel
4).其他问题
(1)、求两个数(m,n,其中mn)的最大公约数和最小公倍数。
(2)、求Fibonacci数列中大于t的最小的数。例如,当t=1000时,数值为1597。
3、字符串处理
(1)、将字符串中ASCII值为偶数的字符删除。
(2)、删除用户输入字符串中所有指定字符。
(3)、实现字符串s中的字符按逆序存放。
(4)、在键盘上输入一串字符,删除其中的字符a,并将得到的新字符串输出。(空格、b呢?)
(5)、在键盘上输入一串字符,删除其中的所有小写字符,并将得到的新字符串输出。(所有大写字符、所有数字字符?)
(6)、下列程序的功能是将字符串中所有大写字母改成该字母的下一个字母,字母Z改为A,其字符不变。
(2)程序为: 其他几题与之相似
clear
t=
accept 请输入字符串 to s
accept 请输入要删除的字符 to a
for i=1 to len(s)
c=substr(s,i,1)
if Asc(c)Asc(a) then
t=t+c
endif
next
?t
cancel
4、一维数组
(1)、输入10个数,输出其中的最大值和最小值,以及他们的位置。
(2)、将10个数按照从小到大的顺序进行排序。
(3)、将具有n个元素的一维数组的元素按逆序重新存放。
(4)、
1、题程序结构为:
clear
s=0
for i=1 to 100
if i%5=0 2题i%2=0
s=s+I 3题上面条件为i%2=1
endi
next
?”s=”,s
cancel
注:7题与6题相同,只是N由键盘输入,故在之前加:input “n=” to n,
将4 题第3语句改为:for i=1 to n
2.小羊体重5千克,每天长体重的2%,大羊体重10千克,每天长体重的1%,问多少天之后,小羊的体重赶上大羊
Clea
Big_y=10
Small_y=5
Days=0
Do while b
您可能关注的文档
最近下载
- 孟子三章课件.ppt VIP
- 《德尔菲法案例》课件.ppt VIP
- 2024-2025学年七年级生物上册 第一单元 单元测试卷(冀少版).pdf VIP
- 人工智能实训室建设方案.pdf VIP
- 人教版初中必背古诗词、文言文.pdf VIP
- 广西和塑建材有限公司年产4000吨ASA合成树脂瓦项目环境影响报告.docx VIP
- 2025至2030国内药用塑料瓶行业市场发展分析及竞争格局与投资机会报告.docx
- 第2课 我向国旗敬个礼( 课件)统编版《道德与法治》一年级上册.pptx
- 2025至2030中国OLED载板玻璃行业发展趋势预判及市场前景研究报告.docx VIP
- 智能矿山暨无人驾驶行业蓝皮书.pdf VIP
文档评论(0)