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

羅蓋仙

求最大公因數？
4 V* R. p# p' q  d求最小公倍數？
( F6 A; s, |* ?. v# S; n
6 r8 b& r. F: P8 L+ z4 C4 N- y#1=45.
! ]2 C% k  r* b* {( f& E! n' _: z#2=36.
  Y" y. \) X- V0 q$ n2 z; _# i" q/ x把#1和#2的最大公因數投入#4
把#1和#2的最小公倍數投入#5
! ]1 ]% z2 I" t, n" {# e3 T
3 a# d8 Q6 t6 v/ d) H% `#1的因數有哪些：分別放在#101～
$ W- ]- Y3 _8 s: J* x#13=101.
#15=1.(計數器，45去除以1-45的一半(就是1-22)能整除，分別放在#101～)
) o; U; n( y- I6 DWHILE[#15 LE FIX[#1/2.]]DO1
! q0 ]  e% r, I; QIF[#1 MOD #15 EQ0.]THEN #[#13]=#15
#13=#13+1.
( F7 p, B1 j. E+ N6 A% I#15=#15+1.
$ X! m4 \& d# ]) d6 g- @: GEND1
  f# n0 |$ \; |" c#[#13]=#1
# L/ q+ U6 P; p5 Y# ~5 L#15=#13

WHILE[#15 LE 101.]DO1(36去除以45的因數.能整除#1和#2的最大公因數就求出來了)
6 X5 P4 n  E8 Q3 P! @/ _2 y9 Q0 kIF[#2 MOD #[#15] EQ0.]THEN #4=#[#15]
" B0 M4 i: q. E* n, SIF[#4 NE #0]GOTO1
9 z0 K, s& V- t) Z/ g  r) |, ^% ]#15=#15-1.
END1
# H) T  d4 [# F$ \  ], ~N1 #11=#1/#4 (#11和#22短除法是一個像大L的符號)
6 |2 p5 t$ @# p1 N#22=#2/#4
#5=#4*#11*#22(最小公倍數)
! p. k) D* ?' z6 x0 t! z* Z( nM0

P.S
2 m/ D4 ?. r7 ?1 k; r我想把#11.#22和#5的式子簡化成
$ {! k* K! H0 Z( i( D$ \4 i. e#5=#4*[#1/#4]*[#2/#4]
; c2 p! d0 G5 w8 M5 W8 a我又想把#11.#22和#5的式子簡化成
2 c) P, D/ ]  r! I- Z# d#5=#11*#22/#4 結束

jiangssli

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