在Vb里怎么做这题目?

[复制链接]
查看11 | 回复1 | 2008-11-7 09:36:51 | 显示全部楼层 |阅读模式
一个数的因子之和等于这个数的本身,这样数叫完全身数。整数28因子为1,2,4,7,14,1加2加4加7加14=28。28是一个完全数写程序从健盘数入M,N求M和N之间的所有完全数

回复

使用道具 举报

千问 | 2008-11-7 09:36:51 | 显示全部楼层
a = InputBox("请输入一个数:", "输入") for i=1 to a-1 step 1if a mod i=0 then
s=s+i end if next iif s=a then label1.caption=a+"是完全数"...
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

主题

0

回帖

4882万

积分

论坛元老

Rank: 8Rank: 8

积分
48824836
热门排行