|
|
马上注册，结交更多好友，享用更多功能，让你轻松玩转社区
您需要 登录 才可以下载或查看，没有账号？立即注册
×
本帖最后由 羅蓋仙 于 2013-2-26 21:23 编辑
b+ @" W, C ~7 J5 T8 r' D% z' [- d( k
求最大公因數？
2 L) D% o# J/ q- ?求最小公倍數？
/ l1 t9 p$ \+ @5 s) Z/ c
1 N# z( b. k4 }#1=45.$ d3 b: q& v# J% M* ~) P
#2=36.6 Q3 k9 Y$ ~& h4 F' Z# u S
把#1和#2的最大公因數投入#4
0 i' r6 f5 b6 e. v b' A把#1和#2的最小公倍數投入#5" g k; c) F; o" l! g! Y8 o
a% c( a# J. N/ ?0 A* e/ A#1的因數有哪些：分別放在#101～
% e6 _+ J' L9 R5 W#13=101.$ e; c1 M% F# c2 @$ q
#15=1.(計數器，45去除以1-45的一半(就是1-22)能整除，分別放在#101～)
: n3 I8 A7 D- n3 A- u3 _5 fWHILE[#15 LE FIX[#1/2.]]DO1
) p& p3 _ V7 q' e/ W ^IF[#1 MOD #15 EQ0.]THEN #[#13]=#15
7 ?2 U& T3 ]# p" a, @& |6 Q/ Z+ T#13=#13+1.9 C) S6 q; p9 m8 @
#15=#15+1.8 @# O H; |" ^% I1 v
END1
9 l- x, _1 @* n J#[#13]=#1' a9 G/ m3 j# Q) E t5 c- {/ C
#15=#130 m" Y: B, C- n) V4 K2 h( p
$ S. y; O- S1 rWHILE[#15 LE 101.]DO1(36去除以45的因數.能整除#1和#2的最大公因數就求出來了)5 J4 ~7 Z7 e8 \4 u1 z+ ]; q
IF[#2 MOD #[#15] EQ0.]THEN #4=#[#15]$ J7 s, S2 x( \# Z; r+ B
IF[#4 NE #0]GOTO1* @4 S/ X. B& x: O9 x W
#15=#15-1." |7 R8 ]5 }& Q3 l5 i, j2 S" I
END1
9 a- W+ W9 _0 L% n! wN1 #11=#1/#4 (#11和#22短除法是一個像大L的符號)1 e3 F" `2 S' s @( V- n
#22=#2/#4
' w/ X- a* {7 D#5=#4*#11*#22(最小公倍數)& t( o1 S& d: d' A& w. }
M0. X6 z# |) m: G5 Y9 j0 _* v
# S1 d/ y, `: h# t: p" _+ kP.S4 b3 }8 b0 P5 U+ D6 P- ?
我想把#11.#22和#5的式子簡化成
4 p1 w2 K9 U2 f) d; @0 C#5=#4*[#1/#4]*[#2/#4]7 ^; d( c3 n4 G @8 @3 f
我又想把#11.#22和#5的式子簡化成# q, V; s, G, m, O
#5=#11*#22/#4 結束
6 [& d4 {- b4 A5 z- @* C |
|
/2 
|Archiver|手机版|小黑屋|若枫后处理论坛
( 苏ICP备11015087号-1|
苏公网安备32059002001368号 )
IP卡
狗仔卡
发表于 2013-2-26 21:19:24
提升卡
置顶卡
沉默卡
喧嚣卡
变色卡
千斤顶
显身卡
