用vfp 做 求两个数的最大公约数和最小公倍数 程序
来源:学生作业帮 编辑:神马作文网作业帮 分类:综合作业 时间:2024/11/18 15:09:32
用vfp 做 求两个数的最大公约数和最小公倍数 程序
CLOSE ALL
CLEAR ALL
CLEAR
DO WHILE .T.
INPUT "请输入第一个整数:" TO n1stNumber
IF INT(n1stNumber) = n1stNumber
EXIT
ENDIF
ENDDO
DO WHILE .T.
INPUT "请输入第二个整数:" TO n2ndNumber
IF INT(n2ndNumber) = n2ndNumber
EXIT
ENDIF
ENDDO
IF ABS(n1stNumber) > ABS(n2ndNumber)
nMaxNumber = ABS(n1stNumber)
ELSE
nMaxNumber = ABS(n2ndNumber)
ENDIF
FOR nLoop_01 = nMaxNumber TO 1 STEP -1
IF MOD(n1stNumber,nLoop_01) = 0 .AND.MOD(n2ndNumber,nLoop_01) = 0
EXIT
ENDIF
NEXT
"第一个整数 " + ALLTRIM(STR(n1stNumber)) + " 与第二个整数 " + ALLTRIM(STR(n2ndNumber)) + " 的最大公约数是:",nLoop_01
FOR nLoop_02 = MAX(n1stNumber,n2ndNumber) TO n1stNumber * n2ndNumber
IF MOD(nLoop_02,n1stNumber) = 0 AND MOD(nLoop_02,n2ndNumber) = 0
EXIT
ENDIF
ENDFOR
"第一个整数 " + ALLTRIM(STR(n1stNumber)) + " 与第二个整数 " + ALLTRIM(STR(n2ndNumber)) + " 的最小公倍数是:",nLoop_02
RETURN
CLEAR ALL
CLEAR
DO WHILE .T.
INPUT "请输入第一个整数:" TO n1stNumber
IF INT(n1stNumber) = n1stNumber
EXIT
ENDIF
ENDDO
DO WHILE .T.
INPUT "请输入第二个整数:" TO n2ndNumber
IF INT(n2ndNumber) = n2ndNumber
EXIT
ENDIF
ENDDO
IF ABS(n1stNumber) > ABS(n2ndNumber)
nMaxNumber = ABS(n1stNumber)
ELSE
nMaxNumber = ABS(n2ndNumber)
ENDIF
FOR nLoop_01 = nMaxNumber TO 1 STEP -1
IF MOD(n1stNumber,nLoop_01) = 0 .AND.MOD(n2ndNumber,nLoop_01) = 0
EXIT
ENDIF
NEXT
"第一个整数 " + ALLTRIM(STR(n1stNumber)) + " 与第二个整数 " + ALLTRIM(STR(n2ndNumber)) + " 的最大公约数是:",nLoop_01
FOR nLoop_02 = MAX(n1stNumber,n2ndNumber) TO n1stNumber * n2ndNumber
IF MOD(nLoop_02,n1stNumber) = 0 AND MOD(nLoop_02,n2ndNumber) = 0
EXIT
ENDIF
ENDFOR
"第一个整数 " + ALLTRIM(STR(n1stNumber)) + " 与第二个整数 " + ALLTRIM(STR(n2ndNumber)) + " 的最小公倍数是:",nLoop_02
RETURN
用vfp 做 求两个数的最大公约数和最小公倍数 程序
vfp中,怎么用表单求两个数的最大公约数和最小公倍数
用Java求两个数的最大公约数和最小公倍数
求两个数的最大公约数和最小公倍数用c++
c语言编程,编写程序,求两个数的最大公约数和最小公倍数
用FOR循环求两个数的最大公约数和最小公倍数的程序(大一生可以看懂的)
用C语言编写一个可以求输入的两个数的最大公约数和最小公倍数的程序.
请用VB程序编程求两个正整数m和n的最大公约数和最小公倍数.
"求两个整数的最大公约数和最小公倍数"这个程序用C++怎么编?
c语言的问题,求两个数的最大公约数和最小公倍数怎么求?请把程序写完整和正确,
用C编一个求最大公约数和最小公倍数的程序!
求两个数的最大公约数和最小公倍数的公式是什么?