|
|
馬上注冊，結交更多好友，享用更多功能，讓你輕松玩轉社區
您需要 登錄 才可以下載或查看，沒有賬號？立即注冊
×
本帖最后由 羅蓋仙 于 2013-2-26 21:23 編輯
) X0 O( A! J) Q9 j/ v
* e; R# D0 i: m- e$ s$ ?9 I求最大公因數？% Y! h1 z/ S, o" q7 h, j
求最小公倍數？
) H. H7 K$ @& S) D% k2 _3 S6 h1 ^8 w+ n2 v1 M# m& Q, ~
#1=45.
% T) b# N* N7 M/ G( V( k. h#2=36.
# O, L8 P# R0 `) W! a8 z T, Q; t% u把#1和#2的最大公因數投入#4, x+ x" g& h& w( J1 M
把#1和#2的最小公倍數投入#5% ^4 u# b0 V, L1 h( G) v; m7 Q
0 p! H E% ?4 L: q6 x! y" K
#1的因數有哪些：分別放在#101～5 Z- p$ f; }! f$ I9 q6 x& w
#13=101.0 ]2 a! h# g4 a& J w( o+ S# ^
#15=1.(計數器，45去除以1-45的一半(就是1-22)能整除，分別放在#101～)
% ?4 Y% c( }! s- oWHILE[#15 LE FIX[#1/2.]]DO1
; {& e; U0 p# u& `) q1 V: rIF[#1 MOD #15 EQ0.]THEN #[#13]=#15
. f0 V( g |6 e% X; i& P. M#13=#13+1.8 _/ q8 @* f$ y& Y5 ~
#15=#15+1.4 S" d, a5 R+ R/ J( f4 j3 Y7 r4 v! G
END1" e9 S: k1 S- ]
#[#13]=#1
# Q5 C8 a4 z$ }" J" {#15=#13
$ L! \2 n9 d. q( z3 ^: B
1 Y8 R$ G( Q3 j; J& wWHILE[#15 LE 101.]DO1(36去除以45的因數.能整除#1和#2的最大公因數就求出來了)0 D. B$ y0 `% z5 g7 o: K
IF[#2 MOD #[#15] EQ0.]THEN #4=#[#15]- c' S" U0 }( O
IF[#4 NE #0]GOTO16 O6 I1 X, A: o" u3 l
#15=#15-1.) X _! l- C& D
END1
% U" x% j" j* M% VN1 #11=#1/#4 (#11和#22短除法是一個像大L的符號)
; s* v3 @! Z2 m" [#22=#2/#48 J6 K, t% e* O( J4 D) b) x8 P/ L
#5=#4*#11*#22(最小公倍數)
8 b/ O( M, i! E6 i. K0 V& NM0& r" Y& X. y9 [ t) y0 o
4 V c( N5 N5 EP.S
) S8 h+ Q/ C: ^% w5 `% T; j我想把#11.#22和#5的式子簡化成
, N, R: @$ M" T3 ?- g! j#5=#4*[#1/#4]*[#2/#4]
9 N: i8 i+ F7 N+ ]; ~0 e+ x我又想把#11.#22和#5的式子簡化成, y0 y; }. [0 K% b9 N6 P
#5=#11*#22/#4 結束
9 @% M! D4 A) F/ i$ m3 m6 A |
|
/2 
|Archiver|手機版|小黑屋|若楓后處理論壇
( 蘇ICP備11015087號-1|
蘇公網安備32059002001368號 )
IP卡
狗仔卡
發表于 2013-2-26 21:19:24
QQ好友和群
QQ空間
提升卡
置頂卡
沉默卡
喧囂卡
變色卡
千斤頂
顯身卡
