|
|
马上注册，结交更多好友，享用更多功能，让你轻松玩转社区
您需要 登录 才可以下载或查看，没有账号？立即注册
×
本帖最后由 羅蓋仙 于 2013-2-26 21:23 编辑
* C9 s; k( r E& _7 ^
0 J- H7 D" r6 g: H- b2 X: Q求最大公因數？7 _- C8 c$ v1 j" b
求最小公倍數？
. L; ~! k# H5 p u. s2 c
# e/ |& \: K# T6 S% b) ]- S#1=45.
5 \& O4 L$ Z) y#2=36.+ h8 H! E5 P$ e# e" q& w- c
把#1和#2的最大公因數投入#40 e/ m/ _# b% W/ M2 N
把#1和#2的最小公倍數投入#5
6 v, X' [# q4 \" T' C3 s3 M1 O
( f1 \9 I0 A% R7 z#1的因數有哪些：分別放在#101～2 m$ e2 r. N, M5 V# i
#13=101.2 \. F$ ~+ m1 W; _) X0 h5 n
#15=1.(計數器，45去除以1-45的一半(就是1-22)能整除，分別放在#101～), Z0 e1 Y4 e6 \ M4 ^/ j* o6 `6 q
WHILE[#15 LE FIX[#1/2.]]DO10 i( H* s* m' t
IF[#1 MOD #15 EQ0.]THEN #[#13]=#151 S) N5 N% m8 o$ j0 t/ \! {% Q' T
#13=#13+1.+ o0 K' s' n& Q s4 k4 i! @: C
#15=#15+1.
: }0 _, u4 y1 ]. `) i- LEND19 T3 [( z0 [+ i, Q$ g
#[#13]=#11 v# k V, t4 }& R; _6 f
#15=#13$ Q% F4 ?& l5 i5 y n1 F) u
$ v9 B h& a, R: m. H! d2 CWHILE[#15 LE 101.]DO1(36去除以45的因數.能整除#1和#2的最大公因數就求出來了)! ^& ^) o2 S' o) y# N6 Y X, _
IF[#2 MOD #[#15] EQ0.]THEN #4=#[#15]
f0 U" s7 @, N. H" hIF[#4 NE #0]GOTO1
: c. }. m! E8 |+ L! x1 {8 u#15=#15-1.. e. i. T2 }9 h1 L3 n8 h
END1
4 |- X) x/ j8 a/ z. C% @+ qN1 #11=#1/#4 (#11和#22短除法是一個像大L的符號)
1 V; _& r( i8 Q/ G4 N* x# b#22=#2/#4( N: a7 O1 E2 A
#5=#4*#11*#22(最小公倍數)
H" g% z9 u- X# [ ]) jM0+ k: L l& J, W1 K* I
) l/ \* Q0 |6 v0 eP.S( H& y0 h/ @" U6 m/ E1 k
我想把#11.#22和#5的式子簡化成
. l# j/ _' N, X0 w7 \( w#5=#4*[#1/#4]*[#2/#4]
( i" R! G: U: C: Y9 I0 ?我又想把#11.#22和#5的式子簡化成( j9 ?# B Z+ h& |. u5 R0 O3 C. M
#5=#11*#22/#4 結束
% K8 s: N8 U- V; _: Y |
|
/2 
|Archiver|手机版|小黑屋|若枫后处理论坛
( 苏ICP备11015087号-1|
苏公网安备32059002001368号 )
IP卡
狗仔卡
发表于 2013-2-26 21:19:24
提升卡
置顶卡
沉默卡
喧嚣卡
变色卡
千斤顶
显身卡
