求最大公因數與最小公倍數

羅蓋仙

' a% R5 M  g' n/ j9 |7 w8 T求最大公因數？
求最小公倍數？

#1=45.
#2=36.
把#1和#2的最大公因數投入#4
把#1和#2的最小公倍數投入#5
7 D& d8 y' q& Q: g( q
#1的因數有哪些：分別放在#101～
#13=101.
1 _! G( G/ Y% v  p#15=1.(計數器，45去除以1-45的一半(就是1-22)能整除，分別放在#101～)
; \7 c! s% t: @/ cWHILE[#15 LE FIX[#1/2.]]DO1
/ B# _7 d& Q) LIF[#1 MOD #15 EQ0.]THEN #[#13]=#15
#13=#13+1.
6 s  h$ x7 H3 M6 X' w#15=#15+1.
* B6 p' O+ d  A( YEND1
2 @7 h0 {5 i9 s! x' [. P* n/ f#[#13]=#1
9 w; F* p) {8 P4 F2 q! w9 F3 i#15=#13
6 J% e3 v$ X/ V5 Q) p. s( V/ M+ W
4 N: i4 D9 |4 l0 C  z$ d5 X2 ZWHILE[#15 LE 101.]DO1(36去除以45的因數.能整除#1和#2的最大公因數就求出來了)
IF[#2 MOD #[#15] EQ0.]THEN #4=#[#15]
/ A+ p* {# D" @9 z) B8 e( A1 QIF[#4 NE #0]GOTO1
8 r8 j2 g: o' Z7 a#15=#15-1.
) d2 ]9 d! n* B0 K/ XEND1
0 z* h4 G$ Q" ?3 }. q6 hN1 #11=#1/#4 (#11和#22短除法是一個像大L的符號)
#22=#2/#4
  K/ r, j& L) \# |! N0 m7 c#5=#4*#11*#22(最小公倍數)
M0
: b+ H& Q  j; M
P.S
- n' X, f3 j& U9 }9 I我想把#11.#22和#5的式子簡化成
- Q7 S  c- R3 V, E: u, a' p7 v$ R#5=#4*[#1/#4]*[#2/#4]
8 m3 O" w: D9 @1 S+ T) b. A我又想把#11.#22和#5的式子簡化成
#5=#11*#22/#4 結束

jiangssli

我暂时还不知道可以用在什么地方.....而且突然忘记公因数和公倍数是什么意思了!!