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

羅蓋仙

! |; B1 L, o( A
求最大公因數？
5 O) N/ P' i) N1 b求最小公倍數？
- g/ f2 p: E2 m6 f: b  A8 s; o* J! A
#1=45.
/ v; f5 r2 X+ ~2 A: f. f#2=36.
, B$ m# X% ]7 L3 i& n. h把#1和#2的最大公因數投入#4
把#1和#2的最小公倍數投入#5

/ z& I- a4 B) T  o" Z" @7 d: K#1的因數有哪些：分別放在#101～
#13=101.
#15=1.(計數器，45去除以1-45的一半(就是1-22)能整除，分別放在#101～)
" O( }. n8 i4 ^5 ]6 y4 QWHILE[#15 LE FIX[#1/2.]]DO1
0 v. g' k; |+ aIF[#1 MOD #15 EQ0.]THEN #[#13]=#15
$ M7 U3 E* B* Z. G& `: U; w#13=#13+1.
#15=#15+1.
0 h1 `+ `& K4 `- ]4 ~1 U  e( Y) GEND1
#[#13]=#1
- a5 b) \( t+ I( }0 E#15=#13
5 ?4 I4 j' O; j9 u6 ^& f3 K# ~
WHILE[#15 LE 101.]DO1(36去除以45的因數.能整除#1和#2的最大公因數就求出來了)
IF[#2 MOD #[#15] EQ0.]THEN #4=#[#15]
1 u4 }, ?# A9 H0 D2 x& B0 jIF[#4 NE #0]GOTO1
6 z& _5 O' y4 K' _#15=#15-1.
; _* O/ P$ u0 e7 D% HEND1
N1 #11=#1/#4 (#11和#22短除法是一個像大L的符號)
( [5 ?) V+ @" }  q#22=#2/#4
) O3 N1 O& o+ v% g, r( D+ r#5=#4*#11*#22(最小公倍數)
' Q5 I6 W' y9 A. ?3 T6 oM0
5 I& u* h4 [$ @2 g. i
P.S
8 r( @: \6 j9 x( `我想把#11.#22和#5的式子簡化成
' `9 Q/ L, g6 B' |5 O0 ?# C#5=#4*[#1/#4]*[#2/#4]
我又想把#11.#22和#5的式子簡化成
#5=#11*#22/#4 結束

jiangssli

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