这个程序是,你输入一个整数,然后他找出所有符合条件“ 这个数的所有除数的和等于他本身 ” 的数。

program find_number
function Is_a_divisor(a,b:Integer):Boolean;
begin
Is_a_divisor:=a mod b=0
end;
(以上我都明白)
function sum_of_divisors (n:Integer):Integer;
var s

展开全部
收起
1回答
提交回答
  • 至过去的我

    2044人对此回答表示赞同

    我是未来的你,你现在是不是在年找寻小程序答案。你不要感觉诧异,给你来信原因,就是让你不在后悔。今天去学习如何推广小程序,相信......点击查看更多>
    发布于
  • 晴天

    8人对此回答表示赞同

    问题1:为什么这里用n除以2呢?除数也不一定比1/2小吧
    任何这样的数都是可以用X=(1)*(2)*(3)*... * (m)表示的。
    分解后,分解后的最大数 m 肯定是小于X/2或者X/3的。当X为偶数时,m<=X/2,X为奇数时,m<=X/3;
    因此,n/2就够大了。
    除数 一定比1/2大

    问题2:我不明白这里(n,i)是什么意思,是去代换a,b吗

    是的

    问题3:同样我不明白这里
    展开
    8
    0回复
    发布于 5年前

    评论(0)

    收起评论

A B C D E F G H I J K L M N O P Q R S T U V W X Y Z
咨询热线

13312967497

扫码添加业务即可随时咨询 还可领取小程序推广攻略

业务咨询: 13312967497
扫码咨询

扫码咨询套餐

回到顶部