|
|
馬上注冊,結交更多好友,享用更多功能,讓你輕松玩轉社區
您需要 登錄 才可以下載或查看,沒有賬號?立即注冊
×
本帖最后由 羅蓋仙 于 2013-2-26 21:23 編輯 % e Q. I, k. T0 x3 x, E
- a( d; n1 \0 l% U8 z
求最大公因數?
: c% K W' G5 W6 l8 V& s$ d0 S$ f求最小公倍數?
6 I, ^2 a. O* B+ {
5 X/ I; E- T. @) T#1=45.% i! o; }& ~6 C; S# F0 ?( K
#2=36.; w) f* b( |" o* c
把#1和#2的最大公因數投入#4( X/ d' [' u4 o
把#1和#2的最小公倍數投入#5# |: C) H }; A+ K' X
5 J& x2 I1 ]1 `
#1的因數有哪些:分別放在#101~
& d5 C+ N2 J: Z" q#13=101./ B( s* f% l7 G( }% h9 q/ D2 J/ P
#15=1.(計數器,45去除以1-45的一半(就是1-22)能整除,分別放在#101~)
, w6 g- a! O# u1 O. }% ~/ T5 D T( X8 DWHILE[#15 LE FIX[#1/2.]]DO1
2 X0 F" p% ?; j8 m1 T5 HIF[#1 MOD #15 EQ0.]THEN #[#13]=#15
9 [# s9 g% w6 ^( B1 K0 n7 j#13=#13+1.3 u ~9 {2 k+ l+ ?' B: B! R) ^) j
#15=#15+1.( c3 d( o1 [' y9 s0 G, k9 d* p
END1
s% R$ k) j7 I: A0 F. U' q1 a( n' e# `#[#13]=#1; m+ f7 l% f( u0 d$ G: c
#15=#13; d6 d7 \& A. E" T. y2 |
/ N* _' O- y9 K$ N1 f9 i2 ~" r
WHILE[#15 LE 101.]DO1(36去除以45的因數.能整除#1和#2的最大公因數就求出來了)
5 L% M% {, A. M/ J2 m4 dIF[#2 MOD #[#15] EQ0.]THEN #4=#[#15]8 W5 H- @3 k7 A4 F- M9 ~' e
IF[#4 NE #0]GOTO1+ M! F" [' `3 Z( k( }
#15=#15-1.0 F" p, _5 Y/ w# m7 {: u
END15 ~3 G! f1 r0 }8 H9 t# ^
N1 #11=#1/#4 (#11和#22短除法是一個像大L的符號)
: G* ? p# D! c; v" H1 B+ i#22=#2/#46 @0 d) M$ ?' V
#5=#4*#11*#22(最小公倍數)
' v( M" P' R' s0 RM0
! J- S8 W0 a% J" S, ~% i
; w5 r0 r! y# Y, c2 RP.S! f/ t0 z- L' E d+ B
我想把#11.#22和#5的式子簡化成
' ^1 l5 E1 @+ |5 m& `8 Z" f5 K6 a#5=#4*[#1/#4]*[#2/#4]5 j! \: v$ U: h+ w& p
我又想把#11.#22和#5的式子簡化成; A9 e' V( L9 d- [. S0 X
#5=#11*#22/#4 結束 * T8 w) ]/ b0 y: q9 G2 ]3 u( [* W
|
|