|
|
马上注册，结交更多好友，享用更多功能，让你轻松玩转社区
您需要 登录 才可以下载或查看，没有账号？立即注册
×
本帖最后由 羅蓋仙 于 2013-2-26 21:23 编辑 8 O% q3 {! ^( A
: I' h- ~, l( X S6 V6 t% x
求最大公因數？" X, i( q" b% K8 `
求最小公倍數？
" G5 ]% Z& Y& V ^" z' d
- D9 ]" t5 m% d# v# v#1=45.
1 W- G$ T- J# z9 j" w- [#2=36.* Y9 @1 I0 i2 ]
把#1和#2的最大公因數投入#4
q( J& O5 U, A6 ]7 w把#1和#2的最小公倍數投入#5
& @' t1 B/ w5 O1 y* [% [# b) I4 r, w$ I: p& w# g) o9 `7 Y. U c
#1的因數有哪些：分別放在#101～
9 u7 i2 g {- Y; A/ Q8 _#13=101.2 |7 J3 X" p7 d) N+ }5 Q6 p
#15=1.(計數器，45去除以1-45的一半(就是1-22)能整除，分別放在#101～)5 E$ @0 Q" n6 l% r( i
WHILE[#15 LE FIX[#1/2.]]DO1
% E, @* g6 J8 M9 CIF[#1 MOD #15 EQ0.]THEN #[#13]=#15
K# _5 D6 o# W6 j3 g#13=#13+1.) H3 N3 r6 g% a
#15=#15+1.) M: l& W7 a& A2 V: c( g
END1 u! R( z5 \/ p5 j, s5 ~
#[#13]=#1
0 Z" q! \; s9 Y1 I* Z#15=#13
5 S. {8 @6 k( ?7 {: p
* O o0 [' a9 L% r& \" h8 E) J: [1 h% H+ vWHILE[#15 LE 101.]DO1(36去除以45的因數.能整除#1和#2的最大公因數就求出來了)) ~6 K7 G5 p1 d* W. X9 s
IF[#2 MOD #[#15] EQ0.]THEN #4=#[#15] q& Q) i, u( F/ S
IF[#4 NE #0]GOTO1+ ?; ?! V' [% L8 w0 V
#15=#15-1.- c. _ c, y* j' s
END1
: ?. j1 }' U/ u5 x e8 iN1 #11=#1/#4 (#11和#22短除法是一個像大L的符號)# J- s& ?# L) u0 E& O
#22=#2/#4! [% p+ `. Z! J& K
#5=#4*#11*#22(最小公倍數)% F& y8 Z; F* F- ~
M0
- ?& L' C0 [! S, K7 X* m
! r4 b# I/ t2 `: pP.S A* W' x+ U1 O% d& \
我想把#11.#22和#5的式子簡化成
9 a }, Q( O/ L+ M) U3 A#5=#4*[#1/#4]*[#2/#4]
, | S) A: g( E3 t& L- q我又想把#11.#22和#5的式子簡化成
! T6 u9 C6 ]7 m& d#5=#11*#22/#4 結束 * C: n1 w% u* }; a- I/ J
|
|
/2 
|Archiver|手机版|小黑屋|若枫后处理论坛
( 苏ICP备11015087号-1|
苏公网安备32059002001368号 )
IP卡
狗仔卡
发表于 2013-2-26 21:19:24
提升卡
置顶卡
沉默卡
喧嚣卡
变色卡
千斤顶
显身卡
