|
|
马上注册，结交更多好友，享用更多功能，让你轻松玩转社区
您需要 登录 才可以下载或查看，没有账号？立即注册
×
本帖最后由 羅蓋仙 于 2013-2-26 21:23 编辑 . Q2 {+ w6 h# I- _9 f9 `/ Z0 o7 Y
5 f; j2 O$ z+ F9 C3 B4 v5 h求最大公因數？9 T L7 h/ k" A
求最小公倍數？1 {% L2 f7 I- B2 Z
2 S2 U# j/ Q' c$ e8 C$ ~, x#1=45.: O7 N, c7 _6 U! } K
#2=36.7 P5 ^0 f* _/ `+ P7 [* r
把#1和#2的最大公因數投入#4& u0 @! k, C" @4 B7 u0 n( f( I7 s
把#1和#2的最小公倍數投入#5
# d0 ^) f" i" W& l2 X
& i% b' I0 p8 m7 Q5 D#1的因數有哪些：分別放在#101～4 I6 r [' w$ _- n
#13=101.+ Y- {7 X Z1 I$ D" [. q
#15=1.(計數器，45去除以1-45的一半(就是1-22)能整除，分別放在#101～)
: ~9 X [" ?- S* d, y9 n1 GWHILE[#15 LE FIX[#1/2.]]DO1
4 t( Z+ w4 Y |- Z+ d! I' oIF[#1 MOD #15 EQ0.]THEN #[#13]=#15
& q8 O5 ?1 n l5 g) \. A#13=#13+1.1 k- B F4 l4 n$ F* p% {- t) S
#15=#15+1.
( z5 m/ O# `# e/ k8 _END1 j% k: | _) a# J5 `4 b3 l+ ?
#[#13]=#1
) @4 j; M; e. |! }8 ~8 p#15=#13
# Z' T! B" u$ @ \
( R. d6 @" x: `2 H$ SWHILE[#15 LE 101.]DO1(36去除以45的因數.能整除#1和#2的最大公因數就求出來了)
- C& r n: R1 j3 ^- X, ~% w: GIF[#2 MOD #[#15] EQ0.]THEN #4=#[#15]
! u: T+ J* @6 TIF[#4 NE #0]GOTO1
4 t( L9 x5 M7 N8 }8 x- e) P#15=#15-1.
! R6 a8 |' B1 ]: M% G* GEND1
% N7 Z }0 l7 U# ~# A, \% n- [N1 #11=#1/#4 (#11和#22短除法是一個像大L的符號) C6 E E# G6 g. j' G4 ]4 q# V- Z
#22=#2/#4* X. O5 S1 U/ M7 }; n% X
#5=#4*#11*#22(最小公倍數)' E0 N3 Y/ F" A7 V; R2 r% ]
M0
, x* y" P8 I) \5 F
! g z9 z* @) g/ G! RP.S7 D- X, l# g7 ], g: @( E
我想把#11.#22和#5的式子簡化成/ ~5 [) O" d& q2 F$ G/ _8 V
#5=#4*[#1/#4]*[#2/#4]
: q: U8 \. O, P4 G+ _我又想把#11.#22和#5的式子簡化成
, e/ y" W( Y3 e* V" h. f#5=#11*#22/#4 結束
4 z: X9 u1 U$ u7 M: O4 \ |
|
/2 
|Archiver|手机版|小黑屋|若枫后处理论坛
( 苏ICP备11015087号-1|
苏公网安备32059002001368号 )
IP卡
狗仔卡
发表于 2013-2-26 21:19:24
提升卡
置顶卡
沉默卡
喧嚣卡
变色卡
千斤顶
显身卡
