VBScript求两个数的最小公倍数,大数翻倍法;求两个数的最大公约数,辗转相除法.麻烦帮我看看那里错了!谢谢!
来源:学生作业帮 编辑:搜狗做题网作业帮 分类:综合作业 时间:2024/06/22 05:42:54
VBScript求两个数的最小公倍数,大数翻倍法;求两个数的最大公约数,辗转相除法.麻烦帮我看看那里错了!谢谢!
最小公倍数代码如下:
两个数的最小公倍数
//以上行不需要修改
function gbs(k,h)
i=1
//修改下行
If h > k Then
h=h:k=k
Else
k=h:h=k
End if
r=k mod h
//修改下行
Do While r 0
h=k
k=r
i=i+1:r=(k*i) mod h
loop
gbs=k*i
End function
//以下行不需要修改
求两个数的最小公倍数
请输入两个自然数:
sub Button1_onClick()
l=Text1.value : m=Text2.value
If not IsNumeric(l) and IsNumeric(m) Then
MsgBox " 您输入的不是数值数据. ", 16 ," 最小公倍数 "
Elseif l*m=0 or l
最小公倍数代码如下:
两个数的最小公倍数
//以上行不需要修改
function gbs(k,h)
i=1
//修改下行
If h > k Then
h=h:k=k
Else
k=h:h=k
End if
r=k mod h
//修改下行
Do While r 0
h=k
k=r
i=i+1:r=(k*i) mod h
loop
gbs=k*i
End function
//以下行不需要修改
求两个数的最小公倍数
请输入两个自然数:
sub Button1_onClick()
l=Text1.value : m=Text2.value
If not IsNumeric(l) and IsNumeric(m) Then
MsgBox " 您输入的不是数值数据. ", 16 ," 最小公倍数 "
Elseif l*m=0 or l
![VBScript求两个数的最小公倍数,大数翻倍法;求两个数的最大公约数,辗转相除法.麻烦帮我看看那里错了!谢谢!](/uploads/image/z/10394357-5-7.jpg?t=VBScript%E6%B1%82%E4%B8%A4%E4%B8%AA%E6%95%B0%E7%9A%84%E6%9C%80%E5%B0%8F%E5%85%AC%E5%80%8D%E6%95%B0%2C%E5%A4%A7%E6%95%B0%E7%BF%BB%E5%80%8D%E6%B3%95%3B%E6%B1%82%E4%B8%A4%E4%B8%AA%E6%95%B0%E7%9A%84%E6%9C%80%E5%A4%A7%E5%85%AC%E7%BA%A6%E6%95%B0%2C%E8%BE%97%E8%BD%AC%E7%9B%B8%E9%99%A4%E6%B3%95.%E9%BA%BB%E7%83%A6%E5%B8%AE%E6%88%91%E7%9C%8B%E7%9C%8B%E9%82%A3%E9%87%8C%E9%94%99%E4%BA%86%21%E8%B0%A2%E8%B0%A2%21)
没错啊
VBScript求两个数的最小公倍数,大数翻倍法;求两个数的最大公约数,辗转相除法.麻烦帮我看看那里错了!谢谢!
求两个数的最大公约数和最小公倍数,辗转相除法算法如何理解
什么是辗转相除法怎样用c语言编程实现,用辗转相除法求两个数的最大公约数
c语言编程 求两个数的最大公约数和最小公倍数 描述:用辗转相除法(即欧几里得算法)求两个正整数的最大
谁来解释一下用辗转相除法求最两个数的最大公约数原理?
求两个数的最大公约数为什么可用辗转相除法,原理是什么
用辗转相除法或者更相减算术求两个数324,243的最大公约数
用辗转相除法或者更相减算术求两个数288,1995的最大公约数
输入两个整数,用辗转相除法球两者的最大公约数,并求他们的最小公倍数
C语言程序填空:用辗转相除法求两个整数的最大公约数、最小公倍数.
如何用辗转相除法求两个数的最小公倍数(步骤)
如何用辗转相除法求三个数的最小公倍数