|
|
马上注册,结交更多好友,享用更多功能,让你轻松玩转社区
您需要 登录 才可以下载或查看,没有账号?立即注册
×
本帖最后由 羅蓋仙 于 2013-2-26 21:23 编辑
* N5 \+ f' ~1 ~8 z' F m* e
# p. K7 s! x( [1 {求最大公因數?$ `" _. }8 i7 f
求最小公倍數?
# }0 r5 W* E0 ?3 v# m( F( V0 V2 Y3 M' g% n
#1=45.3 S( ]1 u9 p3 K& x7 _' v& q3 b6 I
#2=36.
2 G' ]& t( B3 d1 ~6 }% s( ^$ |把#1和#2的最大公因數投入#4
3 ^7 D% K+ A, S0 M |# }6 B把#1和#2的最小公倍數投入#5! h E5 S3 M4 h& D& m3 o
V1 S$ C1 V, n& [$ d
#1的因數有哪些:分別放在#101~
2 e% k9 Y9 \( O9 H" Z$ D2 t#13=101.
) m7 h% d1 ?" @' P# T#15=1.(計數器,45去除以1-45的一半(就是1-22)能整除,分別放在#101~)
* s t9 L; J) h8 n5 QWHILE[#15 LE FIX[#1/2.]]DO1
( S& t1 L0 S0 `& DIF[#1 MOD #15 EQ0.]THEN #[#13]=#156 N2 N* W6 h5 z% q0 g: K- P
#13=#13+1.! z1 X* |& ?' ^1 l2 x4 n# k
#15=#15+1.: V. y2 x8 {- j: w5 {
END1- H$ C7 v' t' ^6 x" ~) C
#[#13]=#1
! @! j( `6 y; d* M; k* X( ]#15=#13! @2 P# V1 @' H K/ A
" C! S9 T5 z% x! a* {9 hWHILE[#15 LE 101.]DO1(36去除以45的因數.能整除#1和#2的最大公因數就求出來了)* h* g' U8 J1 I) `4 G
IF[#2 MOD #[#15] EQ0.]THEN #4=#[#15]
5 ^5 \- Q7 }' }IF[#4 NE #0]GOTO1
7 b) c4 a. Q5 A9 O! K#15=#15-1.+ x% m8 l9 E* v, C
END1" \" W5 ^9 O% I
N1 #11=#1/#4 (#11和#22短除法是一個像大L的符號)
- t6 y! \% w5 p7 P* `. [3 k#22=#2/#4
& G# n! K) O0 S& G: t' V#5=#4*#11*#22(最小公倍數)' n# G- L/ T" ]/ \; d
M0
& o& I$ ~- ^& L6 C- T; S1 Q5 {- \7 z7 t
P.S
# i5 p* y+ M7 R+ @5 p) [3 t' Q我想把#11.#22和#5的式子簡化成" D& g! j% a8 Q( ~& A; o/ j
#5=#4*[#1/#4]*[#2/#4]* l, n' {. n8 q2 L
我又想把#11.#22和#5的式子簡化成) ]8 c, Y, G. K; q
#5=#11*#22/#4 結束
6 Z; d8 u- E. [5 q% b |
|