注册 登录
编程论坛 VB6论坛

请问怎么计算若干个数能同时整除的数

pxinfo 发布于 2019-09-18 22:57, 1659 次点击
数据库中有两个字段:ID 和 数值 例:
ID  数值
1    80
2    40
3    33

求判断 ID 1、2、3的数值 80、40、33 的整除数,
输出结果:80 40有共同的整除数 2 4 8 10 20 40,33没有。
1 回复
#2
沉默的痞子2019-09-19 15:07
求余,余数为0就是整除
n=80
for i=1 to n-1
    if n mod i=0 then print i
next
1