R编写一个数论中的简单定理
2017-03-31 17:16
302 查看
编写一个R程序(函数)。输入一个整数n,如果n不大于0,则终止运算,并输出一句话:“请输入一个正整数”。否则,如果n是偶数,则将n除2,并赋给n;否则,将3n+1赋给n。不断循环,直到n=1,才停止计算,并输出一句话:“运算成功”。
在编写的过程中,当n=1停止运算时,“运算成功”这句话放在循环外面。
f2<-function(n){ if(n<=0) list("要求输入一个整数n") else{repeat{ if(n==1) break #n=1 终止输出“运算成功” else if(n%%2==0) n<-n/2 #n为偶数时,将n/2赋给n else n<-3*n+1 #否则,将3n+1赋给n } list("运算成功") } }
在编写的过程中,当n=1停止运算时,“运算成功”这句话放在循环外面。
相关文章推荐
- 一个简单控件的编写--系统托盘
- C#编写的一个简单的登陆界面对话框的原代码
- 利用C#编写一个简单的抓网页应用程序
- 利用 Debug API 编写一个简单的脱壳机
- 编写一个最简单的交互式题目
- 编写一个简单的Web Service
- 不到140行的C#代码编写一个简单的面向对象的数据库(OODB)
- Win32汇编教程四 编写一个简单的窗口
- 一个用php3编写的简单计数器
- 一个显示地图数据,并实现简单浏览查询程序源码(SDK编写)
- 【Rebol 学习笔记】第一篇:编写一个简单的 CGI 程序
- 利用C#编写一个简单的抓网页应用程序
- 利用C#编写一个简单的抓网页应用程序
- 利用C#编写一个简单的抓网页应用程序
- 一步一步SharePoint 2007之二十三:编写一个最简单的WebPart(1)——创建工程
- 一个简单木马程序的编写
- Linux下,使用C/C++编写一个简单的消息处理程序
- ASP编写的一个简单的颜色吸取器
- 一步一步SharePoint 2007之二十五:编写一个最简单的WebPart(3)——添加WebPart
- 用AJAX编写一个简单的相册