vfp中,怎么用表单求两个数的最大公约数和最小公倍数第四题

来源:学生作业帮助网 编辑:作业帮 时间:2024/11/18 00:19:29
vfp中,怎么用表单求两个数的最大公约数和最小公倍数第四题
xO@f ^۵f?JOڵh1x bf,3n_ZbF}7);?m{j`>>܉?%kcΠ+R7ӞNmn}X/LI0 zsNk9Qܕ$[thRkZľ'=q}3SB:Y5!PjXˆ @MƒClau:,iIJKr zG^ے1 \"CU* q3T'Kl_Gp6-$[ڬ.Sqo1wVYͧ 3C׍CCۯybDf#Y4Ϻ_uqYLVƅd!H ܑ{j p3*,΋EQaYy qe ~aۙ0 ”î  B5`5:x갵q\G ]qx|?ΎIs30|v`,VEC)

vfp中,怎么用表单求两个数的最大公约数和最小公倍数第四题
vfp中,怎么用表单求两个数的最大公约数和最小公倍数

第四题

vfp中,怎么用表单求两个数的最大公约数和最小公倍数第四题
你双击右边的那个文本框,在其click事件中输入程序代码
a=val(allt(thisform.text1.value))
b=val(allt(thisform.text1.value))
for m=min(a,b) to 1 step -1
if a%m=0 and b%m=0
exit
endif
endfor
thisform.label1.caption="两个数的最大公约数是:"+allt(str(m))
thisform.label2.caption="两个数的最小公倍数是:"+allt(str(a*b/m))
thisform.refresh
表单运行时,在两个文本框中输入数以后,你用鼠标单击右边的文本框就能执行.