|
|
马上注册，结交更多好友，享用更多功能，让你轻松玩转社区
您需要 登录 才可以下载或查看，没有账号？立即注册
×
本帖最后由 羅蓋仙 于 2013-2-26 21:23 编辑
4 L8 s' T7 h4 M) @& Q2 ~
1 `1 f1 Q5 B' }0 r3 f( k求最大公因數？( {3 o2 e2 m1 F/ \- Y
求最小公倍數？
% y! O* M6 V8 s+ S( d% w7 W& v6 z) N4 }3 R- e* r$ w
#1=45.9 X+ B! e |. s" B" G
#2=36.
* o! ^. N: R1 ?6 e* d把#1和#2的最大公因數投入#47 _% |3 u4 V: |8 N
把#1和#2的最小公倍數投入#5
7 ~+ i' R8 v2 }2 M8 f
4 ]5 F* p$ r( @; G9 b5 W b#1的因數有哪些：分別放在#101～
' M# Z+ T$ A; u3 f. Z+ n& i#13=101.6 r4 n$ j/ p* N2 e4 V# E0 n
#15=1.(計數器，45去除以1-45的一半(就是1-22)能整除，分別放在#101～)
" u; ~7 N% x. ~3 ~7 FWHILE[#15 LE FIX[#1/2.]]DO1
5 I( D6 ~ B% c( {1 i5 A' p! yIF[#1 MOD #15 EQ0.]THEN #[#13]=#15: A _/ ?4 Q% b! O
#13=#13+1.
7 e2 V, e d& b1 Y6 b#15=#15+1.
* k% |* q1 G* I7 Y x1 hEND1
* B+ v1 l' l$ o, W#[#13]=#17 O- L' X- O$ ^
#15=#13
" J( s' v0 `! ]: M* n1 @8 V+ J' t/ n4 y4 B
WHILE[#15 LE 101.]DO1(36去除以45的因數.能整除#1和#2的最大公因數就求出來了)
! o% ?6 t2 h! s* uIF[#2 MOD #[#15] EQ0.]THEN #4=#[#15]: j8 G5 n$ J0 b8 O+ z. M* I9 x0 c
IF[#4 NE #0]GOTO11 K* n$ l% }* n0 P; t
#15=#15-1.
5 ]- D i) t3 {END1
& F T7 R* m: C# M5 W, \5 iN1 #11=#1/#4 (#11和#22短除法是一個像大L的符號)& c y2 ^2 A; j; k
#22=#2/#4
$ H8 g* s, i; K5 ^) B: }#5=#4*#11*#22(最小公倍數)! G: P3 L' {. q% c6 r( P# n6 H* U% S3 j
M0% u( M& P, c: E* `' b
) J! P; z. X1 U% o3 D5 MP.S0 \% E, s& }4 M" c' r( Z
我想把#11.#22和#5的式子簡化成5 z1 O: N7 c7 L! w2 V
#5=#4*[#1/#4]*[#2/#4]2 O# ~3 G/ \9 l, B
我又想把#11.#22和#5的式子簡化成3 w$ B; a! Z/ A" a j) ? F- A
#5=#11*#22/#4 結束 + E {8 e) S4 l* i/ C
|
|
/2 
|Archiver|手机版|小黑屋|若枫后处理论坛
( 苏ICP备11015087号-1|
苏公网安备32059002001368号 )
IP卡
狗仔卡
发表于 2013-2-26 21:19:24
提升卡
置顶卡
沉默卡
喧嚣卡
变色卡
千斤顶
显身卡
