|
|
马上注册,结交更多好友,享用更多功能,让你轻松玩转社区
您需要 登录 才可以下载或查看,没有账号?立即注册
×
本帖最后由 羅蓋仙 于 2013-2-26 21:23 编辑
4 H" U6 W- n9 X4 v/ Q" ?
' k9 K+ T/ ^& a4 u# z2 F; L求最大公因數?
9 D7 k! N; W/ [0 C: c求最小公倍數?4 T8 i: ~' C$ k/ U R: ~
Y/ U' V$ O* C- K$ @0 P$ k0 @#1=45.
( z f( v, z }#2=36.- ?/ _' W' E+ j; {3 [; P$ f) Z; Q! s
把#1和#2的最大公因數投入#4( v4 L$ A% Z' a5 G& d, \
把#1和#2的最小公倍數投入#5
/ G9 J0 t+ d. V$ [( C9 C. {( _* r" Y0 P$ e; K1 ^
#1的因數有哪些:分別放在#101~7 }7 ]; k( u% |$ g" R5 y0 V
#13=101." u/ C9 |' e8 d m8 k: ~/ C
#15=1.(計數器,45去除以1-45的一半(就是1-22)能整除,分別放在#101~)
2 {$ j5 ?; W0 O7 m2 z, kWHILE[#15 LE FIX[#1/2.]]DO1+ K% p, B9 m( K. h) Y7 s
IF[#1 MOD #15 EQ0.]THEN #[#13]=#15
5 L# B* u6 K) U6 P0 }' n' R) k' _#13=#13+1.
+ G3 n0 j5 r0 s: Z4 O( o( z#15=#15+1.- G7 `, ?' o7 ~' N4 }4 Z% G* _, h) Z
END1
7 ]. Z& f- |8 L8 V3 d% O#[#13]=#1: h5 W. a& h% C d6 f. H
#15=#13
D. J; T- H% W9 I$ \, t6 @7 v, K/ s* v& V, D, D
WHILE[#15 LE 101.]DO1(36去除以45的因數.能整除#1和#2的最大公因數就求出來了)
) m( [" v+ x# _1 w, B8 X1 \6 ~IF[#2 MOD #[#15] EQ0.]THEN #4=#[#15]! w2 h1 f# j. d7 D1 k
IF[#4 NE #0]GOTO1$ [% g* n3 u) D7 C* [6 o+ f5 s
#15=#15-1.
+ H+ a! k3 o. I9 w: y1 V7 s6 uEND1& [( K y+ ~3 e$ j D9 P' F
N1 #11=#1/#4 (#11和#22短除法是一個像大L的符號)
; t s- ?0 n d+ Z/ G5 |#22=#2/#4/ _6 E/ D) O5 F7 B) j4 [6 E( I+ o' d
#5=#4*#11*#22(最小公倍數)
2 b5 F- ]4 `% n- [5 b8 n$ [M0
) k% K& I& r e: w& Y, W5 B9 [5 J/ I9 s: u7 U
P.S' R9 g U9 }) s& ]7 `2 B
我想把#11.#22和#5的式子簡化成
9 V& G: h0 O" y/ Y4 n#5=#4*[#1/#4]*[#2/#4]( Q) P1 x% Z0 C [- m7 \
我又想把#11.#22和#5的式子簡化成! b( E2 z' P( m+ `4 v7 Y/ e
#5=#11*#22/#4 結束 : y5 z3 @2 m) e* \0 {1 Q {1 L5 ^* u
|
|