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

羅蓋仙

# v& Q: k. b% _  J' ?
求最大公因數？
/ S/ {( c3 V/ D$ L$ c2 X求最小公倍數？
4 y0 T7 t: r# {' Z; H3 M
4 L) P# L% f; F2 H2 v9 u$ K#1=45.
  f. h% S; r7 v#2=36.
3 @8 Q9 z. O* f2 n把#1和#2的最大公因數投入#4
1 e" i/ C+ m. i# M8 ?% W把#1和#2的最小公倍數投入#5
$ L( K$ X; Z$ Z* q) g
) r8 Q4 E! I0 d8 |#1的因數有哪些：分別放在#101～
#13=101.
4 l5 U! C/ B' Q6 L8 A) K#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.
) m: c* y; f# {* Y0 S6 n) ]& t) M#15=#15+1.
8 l$ H& }% c9 H% T+ {4 W- GEND1
! J2 M% q3 ~2 z+ e: N: B" L#[#13]=#1
, J# {1 A* S9 h& s+ A$ U# T#15=#13

WHILE[#15 LE 101.]DO1(36去除以45的因數.能整除#1和#2的最大公因數就求出來了)
3 \) ~) f+ ~7 }7 x4 jIF[#2 MOD #[#15] EQ0.]THEN #4=#[#15]
IF[#4 NE #0]GOTO1
#15=#15-1.
8 }; a$ J3 a( EEND1
* Y/ d" M# X7 b4 j) UN1 #11=#1/#4 (#11和#22短除法是一個像大L的符號)
#22=#2/#4
#5=#4*#11*#22(最小公倍數)
M0

- I- ]6 P; O0 X; P+ [9 m  SP.S
- @) L4 U4 D+ z/ G1 R  P8 w' N  r我想把#11.#22和#5的式子簡化成
#5=#4*[#1/#4]*[#2/#4]
8 Y7 H* N$ G! r7 F( }9 ^我又想把#11.#22和#5的式子簡化成
; O( b+ }2 t/ E- q& q#5=#11*#22/#4 結束
9 l( S% Y! _) b" J( w* H' [

jiangssli

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