QBASIC 编程 正整数2009有哪些因数(也叫约数)?请输出所有的因数。

[复制链接]
查看11 | 回复3 | 2009-6-20 16:09:19 | 显示全部楼层 |阅读模式
在线== 速度啊 达人帮帮忙

回复

使用道具 举报

千问 | 2009-6-20 16:09:19 | 显示全部楼层
clsfor a=1 to 2009 doif 2009/a=int(2009/a) then print a,next aend...
回复

使用道具 举报

千问 | 2009-6-20 16:09:19 | 显示全部楼层
clsfor i=1 to 2009if 2009 mod i=0 then print i;next iend...
回复

使用道具 举报

千问 | 2009-6-20 16:09:19 | 显示全部楼层
CLS FOR I=1 TO 2009 IF 2009/I =2009\I THEN PRINT I; NEXT I END...
回复

使用道具 举报

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

本版积分规则

主题

0

回帖

4882万

积分

论坛元老

Rank: 8Rank: 8

积分
48824836
热门排行