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

羅蓋仙

% {% _) G8 A  U" A6 y/ r0 v
求最大公因數？
求最小公倍數？

( }& `  G, m& ^# g6 H2 [+ L0 m#1=45.
$ E! ?( L) ]/ j) d( ^- r2 @/ P#2=36.
把#1和#2的最大公因數投入#4
/ z& [( ~' J- R. Q' W6 ]把#1和#2的最小公倍數投入#5

#1的因數有哪些：分別放在#101～
0 U& B( W, T' z' ]3 h2 ^6 K#13=101.
( c4 R5 }3 I5 R2 ~& _#15=1.(計數器，45去除以1-45的一半(就是1-22)能整除，分別放在#101～)
, S) x0 Y, A+ f, X9 Z; k# U0 a5 rWHILE[#15 LE FIX[#1/2.]]DO1
IF[#1 MOD #15 EQ0.]THEN #[#13]=#15
#13=#13+1.
; ]" M3 w# i  [% z, m#15=#15+1.
END1
: i! O6 k8 j6 ^: p# X% n#[#13]=#1
5 d/ ]' n4 `- O" U) S2 |6 C#15=#13

% I& f+ J2 S% k# kWHILE[#15 LE 101.]DO1(36去除以45的因數.能整除#1和#2的最大公因數就求出來了)
: _2 A8 J; _$ }1 e8 uIF[#2 MOD #[#15] EQ0.]THEN #4=#[#15]
3 e( l) o+ S1 g6 n0 C0 I- i/ P8 jIF[#4 NE #0]GOTO1
0 Z3 M" f3 j% ]8 ~% Z#15=#15-1.
END1
5 ^/ s; t  g" E  y- h5 j. iN1 #11=#1/#4 (#11和#22短除法是一個像大L的符號)
# W* a; k, b2 t! X' c#22=#2/#4
6 ^) k. u! r6 _' |+ W#5=#4*#11*#22(最小公倍數)
M0

P.S
我想把#11.#22和#5的式子簡化成
% V0 C+ Y* }9 P8 B#5=#4*[#1/#4]*[#2/#4]
我又想把#11.#22和#5的式子簡化成
+ X5 J/ i- o" ~& R$ s#5=#11*#22/#4 結束

jiangssli

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