编写一个R程序（函数）.输入一个整数n，如果，则终止运算，并输出一句话：“请输入一个正整数” 我不知道你用什么语言，我写个算法吧：input(n)；if n=1 i=1；else i=0；for；i=1；{if n/2=0n=n/2；elsen=3*n+1；if n=1 i=1；else i=0；}printf(\"运行成功\")不知道你能不能看的懂，
编写一个R程序（函数）。输入一个整数n，如果，则终止运算，并输出一句话：“请输入一个正整数” frezo(n){if(n)list(fail=\"要求输入一个正整数\")else { repeat{if(n=1)break elseif(n%2=0)n*n+1}list(succeed=\"运算成功\")}}
编写一个函数change(x，r)，将十进制整数x转换成r(1 #include<；stdio.h>；char*change(int n，int k，char s[]){ int i=0，len，t，num=0；if(k|k>；36)return NULL；while(n){ t=n%k；if(t>；9)s[i]=t-10+'A'；else s[i]=t+'0'；n/k；i；} s[i]='\\0'；len=i；for(i=0；i；i){ t=s[i]；s[i]=s[len-1-i]；s[len-1-i]=t；} return s；}int main(){ int k，num；char s[33]；printf(\"num newbase：\")；while(scanf(\"%d%d\"，&num，&k)=2){ if(change(num，k，s))printf(\"%s\\n\"，s)；else printf(\"不能转换到%d 进制。\\n\")；printf(\"num newbase(q to quit)：\")；} return 0；}
