主题:程序设计
udbqqqqgy
[专家分:0] 发布于 2005-07-01 11:47:00
谁能帮我解答
求两个数的最小公倍数的编程
回复列表 (共7个回复)
沙发
moz [专家分:37620] 发布于 2005-07-01 14:04:00
请翻看旧贴,没多远的,估计就这一两天的贴.
板凳
陈贺QB [专家分:140] 发布于 2005-07-01 19:29:00
imput m,n
r=m mod n
S=M*n
while r<>o
m=n:n=r
r=m mod n
wend
print "最大公约数";N
END
S=S/N
PRINT"最小公倍数数";S
END
OVER
3 楼
prairiewolf [专家分:290] 发布于 2005-07-01 20:14:00
defint a,b
input a,b
if a>b then swap a,b
do while b mod a
a=b mod a
loop
print "最大公约数是";a
4 楼
def [专家分:3380] 发布于 2005-07-01 21:36:00
defint a,b
input a,b
if a>b then swap a,b
s=a
p=b
do while b mod a
a=b mod a
loop
l=s * p \ a
if s mod p=0 then swap l,a
print "最大公约数是";a
print "最小公倍数是";l
5 楼
prairiewolf [专家分:290] 发布于 2005-07-03 20:51:00
怎么又改成公倍数了???
6 楼
def [专家分:3380] 发布于 2005-07-03 22:39:00
请看好说明
7 楼
prairiewolf [专家分:290] 发布于 2005-07-04 17:23:00
我也不知道了
我来回复