|
|
马上注册，结交更多好友，享用更多功能，让你轻松玩转社区
您需要 登录 才可以下载或查看，没有账号？立即注册
×
本帖最后由 羅蓋仙 于 2013-2-26 21:23 编辑 ; ]* V8 Y) A9 {3 g( `
6 ]5 \. O* I6 ^
求最大公因數？6 ]* |* Z9 z+ Z4 W( u# T9 _8 e
求最小公倍數？! {/ E7 X# [/ Z5 [* A- a
. E& M" a3 V' F, @' h
#1=45.
; ]4 Y7 { _/ \; ^#2=36.
6 T, r5 F5 Q b+ O' g$ R$ t2 e6 d把#1和#2的最大公因數投入#4, |7 r9 Z' H5 ?: U2 @
把#1和#2的最小公倍數投入#5
0 j3 S k: m+ X) i" x4 {0 n5 M
1 k9 m+ U# }& R. ~#1的因數有哪些：分別放在#101～9 h* b7 w6 Y1 i# Q( n9 H: a$ u
#13=101.5 V# }/ A9 w) L, Q9 c) D
#15=1.(計數器，45去除以1-45的一半(就是1-22)能整除，分別放在#101～)( C# @' E% V& ~2 o
WHILE[#15 LE FIX[#1/2.]]DO1
; H. v7 q' q& R3 ~( l" e+ lIF[#1 MOD #15 EQ0.]THEN #[#13]=#153 @6 v2 \$ R! N, E# B3 F
#13=#13+1.* L7 [; Q/ x* R5 B2 E9 H2 U" E1 s% X3 p
#15=#15+1.( s( a: q) C1 N
END15 [" |! Z7 m) Q+ m* I) S
#[#13]=#1" Q( s8 y2 S+ o# P5 T- O
#15=#139 S* R# s& X; L8 o% d
5 ]4 K4 H- x1 p# ^
WHILE[#15 LE 101.]DO1(36去除以45的因數.能整除#1和#2的最大公因數就求出來了)
3 U, M) [( _& _, e" y4 pIF[#2 MOD #[#15] EQ0.]THEN #4=#[#15]8 [2 T" @* F* V! j0 _7 E- ~& C
IF[#4 NE #0]GOTO1$ P" D9 X$ M! L/ R! F
#15=#15-1.
3 ]4 V; H$ C% _' d( h: v" UEND1* N! ~6 _: N& b* f! ~
N1 #11=#1/#4 (#11和#22短除法是一個像大L的符號); b- J6 l# C$ Y
#22=#2/#4
' a2 ~7 V1 v0 p0 o% ^) h: `#5=#4*#11*#22(最小公倍數)
; r: v# @3 T6 e9 s' RM0
; \9 {2 c/ P: u ?6 S$ ]4 @ ~& P6 D1 D/ v! [2 E: b( F5 C
P.S2 b8 M9 E; ~2 V3 E( ?4 ^3 E: d) M) @
我想把#11.#22和#5的式子簡化成+ w. t4 r# c5 K7 o
#5=#4*[#1/#4]*[#2/#4]2 }) S+ z/ [, o5 k% }: ~( m
我又想把#11.#22和#5的式子簡化成
, j6 ~8 y7 W0 U1 C( k" b#5=#11*#22/#4 結束
1 w! {/ p* }: @ |
|
/2 
|Archiver|手机版|小黑屋|若枫后处理论坛
( 苏ICP备11015087号-1|
苏公网安备32059002001368号 )
IP卡
狗仔卡
发表于 2013-2-26 21:19:24
提升卡
置顶卡
沉默卡
喧嚣卡
变色卡
千斤顶
显身卡
