|
|
马上注册，结交更多好友，享用更多功能，让你轻松玩转社区
您需要 登录 才可以下载或查看，没有账号？立即注册
×
本帖最后由 羅蓋仙 于 2013-2-26 21:23 编辑
. T& |3 L+ R" w4 W( Q: o
2 ~/ K5 a0 n7 t# ~6 |求最大公因數？
$ {7 O R! j2 {! K& ]求最小公倍數？' E7 d0 Q; i+ _( P$ T9 V7 D" o
2 H9 _& p' H4 n) z7 a
#1=45.: t& K. Z: a0 U7 C$ |# D6 T
#2=36.
2 y0 o8 P7 b. e把#1和#2的最大公因數投入#46 ?4 R% y2 E* B: b1 v* w
把#1和#2的最小公倍數投入#5- B& G' R2 U3 g& H# G; B; F |2 q
5 Z8 N: g _7 N2 }* l6 y- x9 T
#1的因數有哪些：分別放在#101～
2 y1 W2 |' d' c) ]) |- p- b5 C# H#13=101.
& s. n! J+ I- y' _) V) ?#15=1.(計數器，45去除以1-45的一半(就是1-22)能整除，分別放在#101～)
8 ~6 S+ M' @" _( Z8 kWHILE[#15 LE FIX[#1/2.]]DO1
: G2 X. h: g, c U1 z2 YIF[#1 MOD #15 EQ0.]THEN #[#13]=#15: J) i! U( D2 w8 ]9 D
#13=#13+1.0 ~* m( J9 O* ?% n: t$ e' j
#15=#15+1.: N2 U' Z; _0 f* z* V
END1$ w2 s1 `* F" Y9 _8 |1 {5 V; q
#[#13]=#1
. H7 L6 M& a9 Y7 r#15=#13! e) u3 g2 A3 C, l! |& l8 S
n+ p( M7 }& H1 U+ N* G$ eWHILE[#15 LE 101.]DO1(36去除以45的因數.能整除#1和#2的最大公因數就求出來了)
5 ~, Y" B7 l* T+ j4 B! RIF[#2 MOD #[#15] EQ0.]THEN #4=#[#15]
# u. h2 T. Y# p0 T0 Y9 s. `IF[#4 NE #0]GOTO1
/ y B9 K. N, h- P1 |+ `; |; ~#15=#15-1.2 w+ `( c. _6 x( X5 w
END1
) P/ U% D5 s& A2 O+ [8 lN1 #11=#1/#4 (#11和#22短除法是一個像大L的符號)
) N9 J& h# ] P5 g1 e#22=#2/#4/ ?) _2 }! G3 a- |' K2 ?! }
#5=#4*#11*#22(最小公倍數)
$ _7 w$ |8 h6 W# u& a) b! f; wM0: I/ o- i R! }7 _
% f% Z& J! J& t; K0 v
P.S
# X0 x3 D& o- `! k7 J9 d我想把#11.#22和#5的式子簡化成8 T! r/ K7 f% B( ^" y1 W) g" r
#5=#4*[#1/#4]*[#2/#4]4 b: O! ?6 c- C# V. y
我又想把#11.#22和#5的式子簡化成/ F* V; |: |- m. [7 R K n5 o' K
#5=#11*#22/#4 結束
4 l* i% }+ H2 C5 g3 Q |
|
/2 
|Archiver|手机版|小黑屋|若枫后处理论坛
( 苏ICP备11015087号-1|
苏公网安备32059002001368号 )
IP卡
狗仔卡
发表于 2013-2-26 21:19:24
提升卡
置顶卡
沉默卡
喧嚣卡
变色卡
千斤顶
显身卡
