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

羅蓋仙

! E1 g% X- H% K0 G/ G  k* z: [* T求最大公因數？
求最小公倍數？

#1=45.
#2=36.
: P; W" L8 ^- x9 m) v: M7 o% L把#1和#2的最大公因數投入#4
把#1和#2的最小公倍數投入#5
2 P' ]# e! q# N; V; m0 K; ]/ B
: A$ k9 U9 A, a: u' v* c2 Y/ |$ e#1的因數有哪些：分別放在#101～
8 _8 B( N$ H' l) c! m/ B$ H#13=101.
#15=1.(計數器，45去除以1-45的一半(就是1-22)能整除，分別放在#101～)
WHILE[#15 LE FIX[#1/2.]]DO1
IF[#1 MOD #15 EQ0.]THEN #[#13]=#15
: b5 K3 V  F0 q, k0 r2 ?& O& Q. i#13=#13+1.
- C1 J9 n0 Q" u8 \#15=#15+1.
" L! @7 u  s" i- IEND1
#[#13]=#1
: h' S7 |. U9 l( G. F, Z7 N#15=#13

9 p5 Q5 }3 Q% a" ~& A- {6 x! U1 ]0 VWHILE[#15 LE 101.]DO1(36去除以45的因數.能整除#1和#2的最大公因數就求出來了)
7 E7 z1 [, P6 rIF[#2 MOD #[#15] EQ0.]THEN #4=#[#15]
, z8 e, g: B% z9 q. h$ w5 D: E; sIF[#4 NE #0]GOTO1
) S' v4 ]" G- }, t. N#15=#15-1.
END1
2 E, }8 c0 T6 h7 Y! [# y$ ~* ^* SN1 #11=#1/#4 (#11和#22短除法是一個像大L的符號)
  R) c- ^4 r! x5 t9 o0 k& P#22=#2/#4
#5=#4*#11*#22(最小公倍數)
4 w7 S9 @& r7 I/ {0 ]* u& pM0

: v$ T1 r+ G% n2 f) U* ?P.S
我想把#11.#22和#5的式子簡化成
! h/ @9 R+ t7 T! V# {0 O6 M' H#5=#4*[#1/#4]*[#2/#4]
- [7 F" ?$ y* X我又想把#11.#22和#5的式子簡化成
& V5 E, l+ E5 m& }8 G' O/ W#5=#11*#22/#4 結束
+ s; Z& s! G$ O, z

jiangssli

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