计算机2级级若正整数N的所有因子之和等于N 的倍数,则称N为红玫瑰数.
来源:学生作业帮 编辑:百度作业网作业帮 分类:数学作业 时间:2024/06/24 16:28:42
计算机2级级若正整数N的所有因子之和等于N 的倍数,则称N为红玫瑰数.
如28的因子之和为1+2+4+7+14+28=56=28*2 故28是红玫瑰数.求1到700之间红玫瑰的个数
如28的因子之和为1+2+4+7+14+28=56=28*2 故28是红玫瑰数.求1到700之间红玫瑰的个数
![计算机2级级若正整数N的所有因子之和等于N 的倍数,则称N为红玫瑰数.](/uploads/image/z/3087963-27-3.jpg?t=%E8%AE%A1%E7%AE%97%E6%9C%BA2%E7%BA%A7%E7%BA%A7%E8%8B%A5%E6%AD%A3%E6%95%B4%E6%95%B0N%E7%9A%84%E6%89%80%E6%9C%89%E5%9B%A0%E5%AD%90%E4%B9%8B%E5%92%8C%E7%AD%89%E4%BA%8EN+%E7%9A%84%E5%80%8D%E6%95%B0%2C%E5%88%99%E7%A7%B0N%E4%B8%BA%E7%BA%A2%E7%8E%AB%E7%91%B0%E6%95%B0.)
1
6
28
120
这个VBS写的,参考思路吧
dim i,k,ysh,gs
for i = 1 to 200
ysh = 0
for k = 1 to i
if i mod k = 0 then
ysh = ysh + k
end if
next
if ysh mod i = 0 then
print i
gs = gs+1
end if
next
print "个数为" & gs
6
28
120
这个VBS写的,参考思路吧
dim i,k,ysh,gs
for i = 1 to 200
ysh = 0
for k = 1 to i
if i mod k = 0 then
ysh = ysh + k
end if
next
if ysh mod i = 0 then
print i
gs = gs+1
end if
next
print "个数为" & gs
计算机2级级若正整数N的所有因子之和等于N 的倍数,则称N为红玫瑰数.
整数N的所有因子之和等于N的倍数,则N称为多因子完备数,求[1,1000]之间所有多因子完备数.
若某整数N的所有因子之和等于N的倍数,则N称为多因子完备数,如数28,其因子之和1+2+4+7+14+28=56=2*2
设n为正整数,若不超过n的正整数中质数的个数等于合数的个数,则称这个数为好数,那么所有好数之和为
若正整数N的全部因数之和为2N,则称N为“完全数”.验证6,28,496是完全数
n是满足下列条件的正整数中最小的数:(1)n是75的倍数(2)n恰有75个正整数因子,求n/7
一组自然数中任意3数之和都能被n(正整数)整除.求证:该组数中任意2数之差为n的倍数.
将正整数N接写在每一个正整数右边,如果得到的新数都能被N整除,那么称N为魔术数.试求出小于130的所有魔
设n为正整数,证明:数2∧2∧n+2∧2∧(n-1)+1,至少有n个不同的质因子
一个正整数,如果它能被7整除,或者它的十进制表示法中某个位数上的数字为7,则称其为与7相关的数.现求所有小于等于n(n
从n个正整数1,2,…n中任意取两个不同的数,若取出的两数之和等于5的概率为1/14,则n等于
输出所有小于等于n(n为一个大于2的正整数)的素数,