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

羅蓋仙

7 B" l3 }4 A* c' M8 M
0 c! V; N# f8 y2 W# _; F! M- n求最大公因數？
( S; W) P' U3 C$ a求最小公倍數？

#1=45.
#2=36.
5 L' f4 m. L4 v3 J2 K把#1和#2的最大公因數投入#4
把#1和#2的最小公倍數投入#5

#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
: }1 Q: a4 M: \  ^; p* W#13=#13+1.
, c7 T3 o0 _, C2 @- `& O6 `: W$ n#15=#15+1.
: k' V+ s5 n2 L2 u" BEND1
7 `+ k! r% @. `#[#13]=#1
$ r/ A/ X2 f# v, w& Y/ s#15=#13
+ F. o# p7 |9 F1 A9 r( M2 D
$ r. |/ b! g2 {$ k- SWHILE[#15 LE 101.]DO1(36去除以45的因數.能整除#1和#2的最大公因數就求出來了)
' c  w/ X) U1 A' |* I$ c. i. ?  mIF[#2 MOD #[#15] EQ0.]THEN #4=#[#15]
* {5 k5 N3 {5 J! Z6 B, `IF[#4 NE #0]GOTO1
#15=#15-1.
" l8 ]( k# S9 y2 S4 o1 |3 AEND1
5 E$ S$ c( b, j8 v7 _3 g2 q  N+ RN1 #11=#1/#4 (#11和#22短除法是一個像大L的符號)
#22=#2/#4
' a5 V2 O9 H7 _* B( L  a#5=#4*#11*#22(最小公倍數)
M0
3 ]5 e# x* U5 p
P.S
' ?8 I1 {5 u; k* F8 U) e6 b我想把#11.#22和#5的式子簡化成
/ c1 m$ B; s8 e) U#5=#4*[#1/#4]*[#2/#4]
5 l1 h4 g3 n4 A' j我又想把#11.#22和#5的式子簡化成
5 b/ v5 D+ w! F#5=#11*#22/#4 結束

jiangssli

我暫時還不知道可以用在什么地方.....而且突然忘記公因數和公倍數是什么意思了!!