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

羅蓋仙

( w' [3 s/ s' _% @4 _; X1 b
求最大公因數？
求最小公倍數？
9 B  n# d9 B% n0 P
& [( n$ O0 e3 Y#1=45.
* }( s  F9 o& B' t1 a7 @0 T#2=36.
3 F( w% s& l; E' c, h把#1和#2的最大公因數投入#4
把#1和#2的最小公倍數投入#5

4 O8 i- q; u( C4 u0 `7 }#1的因數有哪些：分別放在#101～
& q2 K: X- a6 x#13=101.
#15=1.(計數器，45去除以1-45的一半(就是1-22)能整除，分別放在#101～)
* e) Y( _/ T5 I+ Z9 n! IWHILE[#15 LE FIX[#1/2.]]DO1
IF[#1 MOD #15 EQ0.]THEN #[#13]=#15
' I+ T+ n" v( U2 u+ z: z) ^#13=#13+1.
; e+ V, {7 ~7 P7 f3 ^#15=#15+1.
) q: x9 ]; o0 p% _END1
' z8 |) a9 }1 h: ]#[#13]=#1
6 w/ o+ O9 @9 A5 z4 {: D) ^& f* t#15=#13

( A5 N% L3 ]$ y  o/ j% \% |WHILE[#15 LE 101.]DO1(36去除以45的因數.能整除#1和#2的最大公因數就求出來了)
& x  V7 o  ~* dIF[#2 MOD #[#15] EQ0.]THEN #4=#[#15]
% }9 P1 d2 ]. i$ w' @! h* SIF[#4 NE #0]GOTO1
. E8 e7 g2 N! u& S$ B" u5 I  H5 i#15=#15-1.
END1
1 `: \" w% H  \, W/ ^, ]# SN1 #11=#1/#4 (#11和#22短除法是一個像大L的符號)
, W+ Q" _: O0 h% j#22=#2/#4
& C; L8 K& U+ U1 q$ S  z2 `#5=#4*#11*#22(最小公倍數)
/ q1 u& V! i# A* `1 cM0
  \. E; v3 p+ V2 q) w
P.S
我想把#11.#22和#5的式子簡化成
  V1 F5 F5 u6 L  C' H) K#5=#4*[#1/#4]*[#2/#4]
我又想把#11.#22和#5的式子簡化成
#5=#11*#22/#4 結束
* x0 R7 y% }. r, a7 f

jiangssli

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