vb编写约分程序

Private Sub Form_Click()

m = 6

n = 14

Print "约分前的分数表示为：" &m"/" &n

If m >0 And n >0 Then

a = m

b = n

res = b Mod a

Do While (res <>0)

b = a

a = res

res = b Mod a

Loop

Print "约分后的分数表示为：" &m / a"/" &n / a

Else

Print "结果梁姿为岩岁：粗渣睁0"

End If

End Sub

程序运行过程:

接受用户输入两个烂脊蚂数, 第一个是分子, 第二个是分母.

输出结果,并等待下一轮.

两个数中任意一个为0, 则程序立即退出.

#include<stdio.h>

#include<conio.h>

main()

{

int iNum,iDeno,iMod,iMin

iNum=iDeno=1

while(iNum!=0 &&iDeno!=0)

{

printf("Please input the numerator and the denominator:\n")

scanf("%i%i",&iNum,&iDeno)

if (iNum==0 || iDeno==0)

continue

if (iNum<iDeno)

iMin=iNum

else

iMin=iDeno

for (int i=2i<=iMini++)

{

if (i>野族iNum || i>iDeno)

break

if (iNum%i==0 &&iDeno%i==0)

{

iNum/=i

iDeno/=i

i=1

}

}

printf("饥埋\n%i\n----\n%i\n",iNum,iDeno)

getch()

}

}

---