求已知正整数n大于30某个值

来源：蜘蛛抓取(WebSpider) 时间：2016-09-21 09:59 标签： 已知正整数n大于30
给出一个整数n,其中n小于等于1000.请求出1~n中所有的素数的个数_百度知道求一pascal程序,给出一个整数n,其中n小于等于10000,请统计n的因数的个数.
小丙wan1872
var n,i,ans:beginreadln(n);ans:=0; //读入,计数器置0for i:=1 to n do if n mod i=0 then inc(ans); //从1到n循环 找到一个他的因数就计数器加一writeln(ans); //最后输出结果end.
要是把n小于等于10000改成呢
为您推荐：
其他类似问题
var n,k: begin readln(n); write(n,
一楼的程序是对的，但是复杂度较高；可以用一个公式，令n=a1^b1*a2^b2*...*an^bn那么它因数的个数就是(b1+1)*(b2+1)*...*(bn+1)代码：var
n,a,t,s:begin
readln(n);
a=2; s:=1;
while n>1 do begi...
var n,i,a:begin read(n);//读入n for i:=1 to n do //循环搜索 if n mod i=0 then inc(a);//如果i是n的因数，那么a加一 write(a);end.
定义、输入输出自己写！我把函数写下function
a(n:longint):var s,i:begin
for i:=1 to n do if n mod i=0 then inc(s);
扫描下载二维码在EX表格中如果实现某数值大于N则+3，否则则+2？_百度知道若某算法流程图如图所示，则输出的n值是______．_答案_百度高考
数学 循环结构...
若某算法流程图如图所示，则输出的n值是______．
第-1小题正确答案及相关解析设计一个算法满足1+2+3+``````+n大于10000时最小正整数n的值
1+2+3+``````+n=n(n+1)/2>10000n=141
为您推荐：
其他类似问题
s=0i=1while s<=10000s=s+ii=i+1end whlieprint iend
我按算法的“传统流程图”形式给出见下图：
扫描下载二维码

我要回帖

更多关于 已知正整数n大于30 的文章

 

随机推荐