急 请问求两个正整数的最小公倍数源代码!!!!! 请帮忙!!! 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 随便写一个,没有优化的:A、B为两个正整数dim i as longfor i=iif(A>b,a,b) to a*bif i mod a=0 and i mod b=0 then print i exit forend ifnext i 补充一点For i = IIf(a > b, a, b) To a * b Step IIf(a > b, a, b) If i Mod a = 0 And i Mod b = 0 Then Print i Exit For End If Next i 受不了了,老师过来看看吧 为什么这段用网页提交的代码不好使? 我用Openrowset函数,将SQLSever中的表记录导入用户指定的Access库,在服务器上运行没问题,但在客户机上,提示Access文件不是有效路径。 数据筛选 谁有true dbgrid 早期版本 5.0, 可送200分 关于commondialog的问题 关于winrar解压问题,在线等 用过Access的过来帮帮忙,回答一个简单SQL问题 请问大侠们,怎么实现这种常见的功能啊! Error in loading dll 遇到困难,请求帮助 没有人会吗?再问怎么改变程序的图标!在线等待
A、B为两个正整数
dim i as long
for i=iif(A>b,a,b) to a*b
if i mod a=0 and i mod b=0 then
print i
exit for
end if
next i
For i = IIf(a > b, a, b) To a * b Step IIf(a > b, a, b)
If i Mod a = 0 And i Mod b = 0 Then
Print i
Exit For
End If
Next i