|
|
马上注册,结交更多好友,享用更多功能,让你轻松玩转社区
您需要 登录 才可以下载或查看,没有账号?立即注册
×
本帖最后由 羅蓋仙 于 2013-2-26 21:23 编辑
- L( Z* o2 L6 x' w
: C6 L& I$ ^3 d8 m1 |% \/ O求最大公因數?
; a) m t4 S. Y* @# P$ ]% D求最小公倍數?# o! X2 j& Z" }% q
7 N6 `& Y& K4 v* e+ b, U: w
#1=45.
3 e& f" Z1 ~* k6 E0 v#2=36.9 j& S. w$ `* @* T1 d" c4 x
把#1和#2的最大公因數投入#4
# [# M% C) E# x! V& H' ~/ L把#1和#2的最小公倍數投入#5
# D6 r, N# s# X" x u7 \, S
- s8 H* \" e' L1 X#1的因數有哪些:分別放在#101~& d6 \1 w- G( S, ~- q2 t- | g0 s9 C; j
#13=101.( \0 B6 _8 H" i& C
#15=1.(計數器,45去除以1-45的一半(就是1-22)能整除,分別放在#101~)
/ w6 s2 Y: T6 G3 N+ ^! ^WHILE[#15 LE FIX[#1/2.]]DO1! O3 H: B2 p! ?% n D/ h: @9 R
IF[#1 MOD #15 EQ0.]THEN #[#13]=#15
0 l4 o* T0 q& @#13=#13+1.: z9 g3 x \, ~- i
#15=#15+1.
1 z7 m0 d, ?$ D; M8 a4 {END14 D3 y1 X* p6 N `/ w2 `, u
#[#13]=#1
. I+ [' \# j" a1 |5 |, A7 J#15=#13( V. F! Q0 M0 D% R
: V( x# \+ x0 c9 j8 s- s( FWHILE[#15 LE 101.]DO1(36去除以45的因數.能整除#1和#2的最大公因數就求出來了)
3 e% c: C2 _6 m# p; I0 p1 FIF[#2 MOD #[#15] EQ0.]THEN #4=#[#15]
6 `) }. Z. @* SIF[#4 NE #0]GOTO1
8 ?3 F% B7 i9 M8 |: `! I#15=#15-1.! V4 d9 n. `% L( l) j: `- l# I6 O
END1
/ U# W) v+ }: G2 E9 U' ]- ^N1 #11=#1/#4 (#11和#22短除法是一個像大L的符號)
) q0 b1 a7 O% V) F- G#22=#2/#4$ U1 O3 L) k2 t7 S7 n6 Q
#5=#4*#11*#22(最小公倍數)
) ^6 `- e, P2 d' `5 }M05 |" Y7 T A: Q& a s/ e
m# j- u' w1 c2 S5 H( BP.S
9 P% V& v0 D' |6 g我想把#11.#22和#5的式子簡化成
4 I. C3 C0 c$ C7 i#5=#4*[#1/#4]*[#2/#4]3 M/ }: c- Q5 j
我又想把#11.#22和#5的式子簡化成
. [1 C9 {& e. l0 l1 `/ Z#5=#11*#22/#4 結束
" o" i% `5 T1 s6 z |
|