[求助]关于计算最小公倍数
请大家帮个忙,想做个计算两个数的最小公倍数的程序。我把图片上传了,大家看看。
我说下我的思路吧;
dim x,y,z
x=val(text1.text)
y=val(text2.text)
if x>=y then
z=x
else
z=y
end if
do
n=z mod x
m=z mod y
z=z+1
loop until n=0 and m=0
哎,我不知道了!
大家帮我看看!谢谢
请大家帮个忙,想做个计算两个数的最小公倍数的程序。我把图片上传了,大家看看。
我说下我的思路吧;
dim x,y,z
x=val(text1.text)
y=val(text2.text)
if x>=y then
z=x
else
z=y
end if
do
n=z mod x
m=z mod y
z=z+1
loop until n=0 and m=0
哎,我不知道了!
大家帮我看看!谢谢