VB编写程序,输入整数m和n,计算m和n的公约数之和

2021-04-19 06:28:00 字数 1562 阅读 1473

1楼:匿名用户

publicfunctiongy()asintegerdimm,n,sum,tasintegerm=inputbox("输入第bai一个自du然zhi数")n=inputbox("输入第二

dao个自然数")

sum=0

ifm

fori=1ton

ifmmodi=0andnmodi=0then

sum=sum+i

endif

next

returnsum

endfunction

2楼:匿名用户

dim m,n as long m = inputbox("请输入du非zhi

负整dao数版

权m", "输入", "0") n = inputbox("请输入非负整数n", "输入", "0") if m >= 0 and n >= 0 then if m >= n then msgbox "m = " & m & ...

vb设计 输入两个正整数m和n,求他们的最大公约数和最小公倍数

3楼:匿名用户

option base 1

private sub command1_click()dim x%(), i%, n%, b%, max%max = 1

n = inputbox("n=")

redim preserve x%(n)

for i = 1 to n

x(i) = int(rnd * 20 + 1)print x(i);

if x(i) > max then max = x(i)next i

do while b = n

b = 0

for i = 1 to n

if max mod x(i) = 0 then b = b + 1next i

max = max + 1

loop

print "的公

bai倍数是"; max - 1

end sub

帮忙du说说怎zhi

们输出dao的结果不对内,错容在哪

4楼:匿名用户

private sub command1_click()dim m,n,r ,min as integerm=text1.text

n=text2.text

dor=m mod n

m=nn=r

loop until r=0

text3.text=m

min=val(text1.text)*val(text2.text)/m

text4.text=min

end if

(m是指第抄

一个,n是指第二个数,r是个参数,min是指最小公倍数,希望你能看懂)

5楼:匿名用户

看我原来的回答记录···里面有最大公约数和最小公倍数的问题···

c"语言"编程"输入正整数m和n(m》1,n

1楼 匿名用户 这个刚才阿哥测试过了,,oko o哈! include void main if i j printf d j printf n 2楼 include stdio h void main printf count d sum d n count sum int prime int m...

c语言编写程序输入正整数n计算,c语言编写程序,输入一个正整数n,计算1+(1/3)+(1/5)+...的前n项之和。求过程

1楼 匿名用户 include int main for i 1 i n i printf sum 3f n sum return 0 示例运行结果 20sum 2 480 2楼 匿名用户 include int main void for int i 0 i printf 数列前 d 项之和为 g...

从键盘输入两个正整数m和n(m 1,n 500,且n大于m

1楼 我是比丘猴 楼主你好 根据你的需求, 如下,请认真 include int main int i j while a b printf n d d n flag sum printf d到 d之间有 d个素数 a b flag for k 0 k return 0 希望楼主能看明白,祝楼主学习...