|
|
马上注册，结交更多好友，享用更多功能，让你轻松玩转社区
您需要 登录 才可以下载或查看，没有账号？立即注册
×
本帖最后由 羅蓋仙 于 2013-2-26 21:23 编辑 P3 h+ p `/ {' c5 L
" Q/ l* z" y- M
求最大公因數？
1 v7 R5 a# h$ O- J- _; O7 ^ E' m求最小公倍數？
0 S. n4 k, G3 u: H4 \6 d9 @6 o, a. I. O/ y1 O
#1=45.
4 C$ J; X7 E6 k# I" Y2 D) e#2=36.
" b8 }( O& z3 _3 t7 L+ F+ b把#1和#2的最大公因數投入#4
% }5 Q( T. s6 c2 N, {" I% f把#1和#2的最小公倍數投入#5" A' x& C5 o5 Z) H# G4 B; `4 p
2 a( o/ V4 G, ]5 h2 z& I$ B
#1的因數有哪些：分別放在#101～7 [7 ^: K! Q" a, C* C0 \
#13=101.
4 q/ F* k) J' P- | s0 q2 [#15=1.(計數器，45去除以1-45的一半(就是1-22)能整除，分別放在#101～)
8 l3 Y6 I* Z: X" BWHILE[#15 LE FIX[#1/2.]]DO13 ^5 b$ Y/ L7 v. M
IF[#1 MOD #15 EQ0.]THEN #[#13]=#15
t; _$ m6 H# z: h' v" s) L, N#13=#13+1.2 ~/ Z z; d' _
#15=#15+1.! x5 H0 f& i7 W, a* l" F$ _7 [& R! U
END1
4 H0 x3 b; {* _9 {9 ?: p#[#13]=#1
% \: |3 C6 |! f' J; N# |5 c! O#15=#13
3 [' R# O7 r/ |+ Z+ j- r
) s+ C3 }! F6 S" X7 m5 rWHILE[#15 LE 101.]DO1(36去除以45的因數.能整除#1和#2的最大公因數就求出來了)0 q) k8 M4 ]) J# R+ c! y& g. s
IF[#2 MOD #[#15] EQ0.]THEN #4=#[#15]
- O, H H5 Q# V" E6 wIF[#4 NE #0]GOTO1
! t5 S0 z: r# k7 U#15=#15-1. T+ K. W( i* N( j9 M+ d
END1 ~2 p0 W" X3 J, e8 B% E
N1 #11=#1/#4 (#11和#22短除法是一個像大L的符號)
6 Q, D2 x# r% Q n$ U! m/ J0 Z" o#22=#2/#4
( @) a) l, E9 N2 B#5=#4*#11*#22(最小公倍數)
, Q: x' P' Z0 M2 }4 u/ J$ c% r7 lM0
$ i, y/ ?. p: n; B# }5 j8 D1 Y. Z; m; w5 O0 P/ y7 n
P.S
6 b/ I( P$ d: j6 o9 Q; C& V我想把#11.#22和#5的式子簡化成& Y* |9 y6 _+ o4 P) t& v
#5=#4*[#1/#4]*[#2/#4]" r4 W) T- ^* P3 W
我又想把#11.#22和#5的式子簡化成
2 ?, O: ]* \$ d! S" z& q#5=#11*#22/#4 結束
- l) r: {5 o# M; _+ U3 F4 }# T |
|
/2 
|Archiver|手机版|小黑屋|若枫后处理论坛
( 苏ICP备11015087号-1|
苏公网安备32059002001368号 )
IP卡
狗仔卡
发表于 2013-2-26 21:19:24
提升卡
置顶卡
沉默卡
喧嚣卡
变色卡
千斤顶
显身卡
