|
|
马上注册，结交更多好友，享用更多功能，让你轻松玩转社区
您需要 登录 才可以下载或查看，没有账号？立即注册
×
本帖最后由 羅蓋仙 于 2013-2-26 21:23 编辑 ; |9 D( n4 E+ q
% Z/ I4 P9 x" W/ q9 q& r/ o! n0 _
求最大公因數？; p8 C7 s x: n. T
求最小公倍數？
% p" c/ k$ d; W$ a: ^' V) g; Y& H0 e
! s2 l% z0 T2 V1 W2 a8 ^! d#1=45.2 @( L8 v8 k5 \0 H) L* |& `+ `
#2=36.8 C: L7 _* Q& U. r6 b! q3 Q
把#1和#2的最大公因數投入#4! N3 @3 G6 a4 a6 g5 Q* M' M+ M
把#1和#2的最小公倍數投入#55 B) X5 p! G( q/ B5 Y2 k8 j
" I. h8 Z1 X' l
#1的因數有哪些：分別放在#101～
6 M( j+ @: B; o& B1 I#13=101.
3 p2 P9 G! \2 I5 B' J6 Q) X#15=1.(計數器，45去除以1-45的一半(就是1-22)能整除，分別放在#101～)
- k% o# L7 k9 ^+ `1 m# e/ N3 xWHILE[#15 LE FIX[#1/2.]]DO1$ u3 |$ O/ v- ?3 ~4 X
IF[#1 MOD #15 EQ0.]THEN #[#13]=#152 H1 Y: O: J( _
#13=#13+1.5 S1 E' u, {4 q; z2 @
#15=#15+1.
9 {+ ~9 s; [- w+ {* D7 n* WEND1+ x- R# E2 d- D% j2 L6 q
#[#13]=#1
* S+ w' |' X6 e, r/ e1 D3 ]7 m8 R& u#15=#13) F' M( R: P$ B- B# s
2 |" A$ y5 |2 C; O1 c( ^. w% T8 PWHILE[#15 LE 101.]DO1(36去除以45的因數.能整除#1和#2的最大公因數就求出來了)! z) _; f" B% g: M9 q' t8 L5 Z
IF[#2 MOD #[#15] EQ0.]THEN #4=#[#15]* G# ]& f' _- m9 b
IF[#4 NE #0]GOTO1
0 x, { w9 h7 _! s3 v#15=#15-1.$ w* \9 y# `* w6 z' L
END1
$ s' w7 g" l/ q4 V$ x0 W- RN1 #11=#1/#4 (#11和#22短除法是一個像大L的符號)6 J0 _( Y# `6 Y9 W: R( E
#22=#2/#4) P# L8 S7 W1 G( ^
#5=#4*#11*#22(最小公倍數)( w# g/ q+ \3 ?
M0 z& U& D! @2 g% }
$ a' I, o; c+ V- A7 U' c0 Z$ S0 jP.S
- ^$ t) \8 I2 c5 p我想把#11.#22和#5的式子簡化成
6 S5 N. w5 ~! Q5 A1 z; l#5=#4*[#1/#4]*[#2/#4]
# t0 j. s* p* u) B' `! Q我又想把#11.#22和#5的式子簡化成% O# o) A) J0 f; [& a; B" x' S/ |
#5=#11*#22/#4 結束 ' s+ Q; A1 K q4 m* g3 E
|
|
/2 
|Archiver|手机版|小黑屋|若枫后处理论坛
( 苏ICP备11015087号-1|
苏公网安备32059002001368号 )
IP卡
狗仔卡
发表于 2013-2-26 21:19:24
提升卡
置顶卡
沉默卡
喧嚣卡
变色卡
千斤顶
显身卡
