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

羅蓋仙

0 k3 A# {) t+ V* Q: x% B8 n
( B1 [3 A8 d" S求最大公因數？
求最小公倍數？
7 l) N$ o/ p/ |  B9 z
- c( B6 O  o4 X9 \#1=45.
$ p; Q$ A6 O9 c5 Z2 E! E#2=36.
$ M% B. T  ~; Y把#1和#2的最大公因數投入#4
把#1和#2的最小公倍數投入#5
& u- t+ o4 Z* i# A( M3 Y9 }
#1的因數有哪些：分別放在#101～
# Y2 M5 d: b+ }. I0 e, Q#13=101.
#15=1.(計數器，45去除以1-45的一半(就是1-22)能整除，分別放在#101～)
WHILE[#15 LE FIX[#1/2.]]DO1
; Q  U/ q8 G: n( {2 Y  o3 T* QIF[#1 MOD #15 EQ0.]THEN #[#13]=#15
1 j# o; c; n# i. a) J* m#13=#13+1.
#15=#15+1.
END1
! f( U, u+ X! `9 P' C2 \#[#13]=#1
#15=#13
; ]" O2 c8 M% E, m, Q2 }
5 G( A( d7 c6 @WHILE[#15 LE 101.]DO1(36去除以45的因數.能整除#1和#2的最大公因數就求出來了)
IF[#2 MOD #[#15] EQ0.]THEN #4=#[#15]
$ h* @3 O  [* f$ a0 d( vIF[#4 NE #0]GOTO1
5 f# l* j6 }7 A* ?: y  o: t  \#15=#15-1.
9 u2 W4 H2 v& I7 P2 VEND1
N1 #11=#1/#4 (#11和#22短除法是一個像大L的符號)
8 F6 H3 y3 f  h! i" T#22=#2/#4
#5=#4*#11*#22(最小公倍數)
M0
; {+ S! P0 u+ S7 L
P.S
* f" i' L  O* j我想把#11.#22和#5的式子簡化成
#5=#4*[#1/#4]*[#2/#4]
) [2 M% v+ n; _" v我又想把#11.#22和#5的式子簡化成
" X$ M* O1 I3 E0 \#5=#11*#22/#4 結束
; m- C) t% h" S) C2 ]+ U

jiangssli

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