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

羅蓋仙

8 y+ V  o) \  G* x, L. M! y求最大公因數？
4 O" u, ]8 `+ |. W+ ?- J3 J求最小公倍數？
8 }+ K$ l' @  ]9 b% P" Q2 X" h
#1=45.
7 Z5 K& [- }6 K; X' {#2=36.
把#1和#2的最大公因數投入#4
把#1和#2的最小公倍數投入#5
7 Q7 t) b+ q" b/ c
# O! b" `( h/ B#1的因數有哪些：分別放在#101～
#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
#13=#13+1.
#15=#15+1.
END1
#[#13]=#1
#15=#13
+ l5 e  V! U2 A( m% F3 |+ Y
WHILE[#15 LE 101.]DO1(36去除以45的因數.能整除#1和#2的最大公因數就求出來了)
4 N. B4 V6 o" `7 j1 f! a/ bIF[#2 MOD #[#15] EQ0.]THEN #4=#[#15]
* S+ I" Z( W4 `6 F4 C; eIF[#4 NE #0]GOTO1
0 f0 x; r# n/ Z) \: \/ _#15=#15-1.
% Y) M/ T( t0 C3 n" [' T( P9 B3 fEND1
6 C6 L. L) M6 l4 W7 T/ v; hN1 #11=#1/#4 (#11和#22短除法是一個像大L的符號)
! k0 z5 `* n, }6 E& ?- T7 k+ H/ Q2 k3 |#22=#2/#4
#5=#4*#11*#22(最小公倍數)
, b" M* W  Z0 I6 OM0
* s! m5 o7 S& g4 ^6 {
P.S
# v0 V! M/ M* J% S; V我想把#11.#22和#5的式子簡化成
# K& ?5 S1 T! G; `1 w, m7 U#5=#4*[#1/#4]*[#2/#4]
/ c. S0 L7 N5 D我又想把#11.#22和#5的式子簡化成
#5=#11*#22/#4 結束
" \# {9 t- E9 a! y* R% p0 ?

jiangssli

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