rmml.net
当前位置:首页 >> 一个数真因子之和等于其本身,10到10000之间有多少个? >>

一个数真因子之和等于其本身,10到10000之间有多少个?

10000以内的完全数就下列4个: 6=1+2+3 28=1+2+4+7+14 496=1+2+4+8+16+31+62+124+248 8128=1+2+4+8+16+32+64+127+254+508+1016+2032+4064 故10到10000之间有3个。

#include int main() { int i,j,s; for(i=2;i

#include using namespace std; int main() { int i,k; int sum=0; for (i = 2;i

因为只需要输出完数的因子,所以如果在判断过程中保存因子,会存在极多不必要的操作;所以此处选用了在得到完数后再计算一次其因子的方式。 /* 完数:一个数的因子之和等于该数 */ #include #include void main() { int i,j,sum=1; for(i=3;i

程序代码: Sub xxx() Dim i, j, n, s For i = 1 To 10000 n = 0 s = "" For j = 1 To i / 2 If i Mod j = 0 Then n = n + j s = s & "+" & j End If Next j If n = i Then s = Right(s, Len(s) - 1) & "=" & i Print s End If Next iEnd Sub 输...

/* 新建一个名为Number.java的文件 */class Number{ public static void main(String args[]){ int i,j,sum; for(i=2;i

#include int i,j; int factor(int m) { int k=0; for(i=1;i

C代码: #include void findqin(){ int a,i,b,n; for(a=2;a

m = input('请输入m的值:')%所求 完全数范围 下限 n= input('请输入n的值:')%所求 完全数范围 上限 for s = m:n y = 0; for i = 1:s/2 if mod(s,i) == 0 y = y + i; end end if y == s s end end 请输入m的值:1 m = 1 请输入n的值:10000 n = 100...

主程序如下: var i,j,s,total:longint;begin i:=3; total:=0; repeat s:=1; //求一个数的真因子要加上1,而不用加上它本身 for j:=2 to trunc(sqrt(i)) do //求一个数的约数只需求到它的平方根以内 if i mod j=0 then s:=s+j+i div j; //这句话...

网站首页 | 网站地图
All rights reserved Powered by www.rmml.net
copyright ©right 2010-2021。
内容来自网络,如有侵犯请联系客服。zhit325@qq.com