|
|
马上注册，结交更多好友，享用更多功能，让你轻松玩转社区
您需要 登录 才可以下载或查看，没有账号？立即注册
×
本帖最后由 羅蓋仙 于 2013-2-26 21:23 编辑 ' l+ O' e; \" [4 O
8 g' ]5 l# V6 W4 Q2 P2 @3 c求最大公因數？
, z- q$ N" _6 F6 b& [/ ~求最小公倍數？
2 {& W% M: Z* M5 {5 I- Z4 |9 o' l8 l! b' d+ V$ n
#1=45." w& b( ?5 \) d# w6 l1 y4 ?0 t3 L2 d% E
#2=36.
3 G1 B6 w& P9 {4 x把#1和#2的最大公因數投入#4! D' u$ c% _' l' M/ b. w
把#1和#2的最小公倍數投入#5
5 P# n; c4 v' J F0 ]# h2 d1 _- u" \8 v" U2 d6 M0 g8 W( s; O
#1的因數有哪些：分別放在#101～4 F, X" l8 C% f, S
#13=101.5 h9 i* T6 J' o' ~0 o+ O: v% h
#15=1.(計數器，45去除以1-45的一半(就是1-22)能整除，分別放在#101～)
# u ^9 u/ a- q0 V$ x" sWHILE[#15 LE FIX[#1/2.]]DO1 {, U$ p7 R4 x+ F
IF[#1 MOD #15 EQ0.]THEN #[#13]=#159 x, s( x5 V4 y* W
#13=#13+1.
! f6 M: _0 Z8 X, \ Q" c$ ~' y#15=#15+1." b7 X2 o! _3 H$ J/ C L
END1
" o2 _/ A+ K _% ?#[#13]=#1) g+ ~- B: B$ ?" k1 `1 n. G
#15=#13( Y* t( |! f# I: u
! G- g' f9 m( X4 O0 UWHILE[#15 LE 101.]DO1(36去除以45的因數.能整除#1和#2的最大公因數就求出來了)( o B p) L3 H6 V8 u
IF[#2 MOD #[#15] EQ0.]THEN #4=#[#15]
5 x' }" e1 p* p" f% V' BIF[#4 NE #0]GOTO18 {: Q* ^& m& T: Y. L' c
#15=#15-1.
' T1 i: o' {' f, m5 K+ U" ?8 AEND1
/ _7 D: {+ c3 b3 U2 _0 c- zN1 #11=#1/#4 (#11和#22短除法是一個像大L的符號)
. [( n% n9 L" i* `- l: K#22=#2/#4/ l' j8 ?1 c; X7 S) g
#5=#4*#11*#22(最小公倍數)
9 I" Y7 a9 m. X) oM0 o7 f7 V- b6 M4 J7 J K& y
% u2 J8 s- x8 [/ r1 V6 n, FP.S
. Z2 F" i0 Q4 X+ h) a5 g我想把#11.#22和#5的式子簡化成! e* Q: T) ]4 ~5 W4 t
#5=#4*[#1/#4]*[#2/#4]
6 D4 h) s% [0 ?& l- T3 _我又想把#11.#22和#5的式子簡化成
8 c6 @* k: r+ ?: M, r" X#5=#11*#22/#4 結束 + g8 H& g/ [8 B7 ?0 @' D
|
|
/2 
|Archiver|手机版|小黑屋|若枫后处理论坛
( 苏ICP备11015087号-1|
苏公网安备32059002001368号 )
IP卡
狗仔卡
发表于 2013-2-26 21:19:24
提升卡
置顶卡
沉默卡
喧嚣卡
变色卡
千斤顶
显身卡
