بخش دوم:
http://hupaa.com/forum/viewtopic.php?t=5213
بخش سوم:
http://hupaa.com/forum/viewtopic.php?t=5215
بخش چهارم:
http://hupaa.com/forum/viewtopic.php?t=5373
همه ما در دبستان، يافتن ب. م. م. ميان دو عدد را،
از راه تجزيه آنان به نخستشمارگان (اعداد اول) آموختيم
نمونه 1:
نمونه 2:
روش ديگر يافتن ب. م. م. ميان دوعدد، روش آلگوريتم ِ اكليدس است كه
اكليدس آنرا 2200 سال پيش در كتابش آورده است:
1- عدد نخست را به عدد دوم (در اين گام بخشياب ماست) بخش مي كنيم،
بخش و مانده را مي نويسيم.
2- اگر مانده صفر نباشد، در گام پسين، بخشياب ِ پيشين را به مانده بخش
مي كنيم و دو باره بخش و مانده را مي نويسيم،
اين روند را همچنان دنبال مي كنيم تا مانده ما صفر شود، آنگاه
واپسين مانده اي پيش از مانده صفر، ب.م.م. آندو عدد مي باشد.
نمونه 1:
بنابراين براي كد نويسي ب. م. م. دو عدد طبيعي a و b
به روش اكليدس، گام هاي زير را پي ميگيريم:
1- m = a و n = b مي گذاريم
2- اگر m < n ، آنگاه m و n را جابجا مي كنيم
m = b و n = a مي گذاريم
3- r = m Mod n را بدست مي آوريم
4- m = n و n = r مي گذاريم
5- اگر r <>0 با گام 2 آغاز مي كنيم
براي نمونه در Visual Basic مي شود چنين نوشت:
Function BMM(ByVal a As Long, ByVal b As Long) As Long
Dim Mande As Long
Do
Mande = a Mod b
a = b
b = Mande
Loop Until Mande = 0
BMM = a
End Function
--------------------------------------------------------