ک . م .م و ب. م . م

[rezayavari]

سلام کسی می تونه ک . م .م رو بنویسه ؟ خیلی فوری نیاز دارمش
من خودم ب . م .م رو نوشتم هر کی می تونه ک . م .م رو بنویسه
ک . م . م = کوچکترین مقسوم علیه مشترک
ب . م .م = بزرگترین مقسوم علیه مشترک
این ب . م . م است

کد:

a = InputBox(" Enter First number ")
    b = InputBox(" Enter secound number ")
    Do While b <> 0
       R = a Mod b
       a = b
       b = R
    Loop
    Print "B.M.M is ==> " & a

[arashrj]

سلام
برای بدست آوردن ک م م اول a رو ضربدر b کن بعد حاصل رو تقسیم بر ب م م

کد:

Kmm = (a*b) / bmm

موفق باشی