|
|
馬上注冊，結交更多好友，享用更多功能，讓你輕松玩轉社區
您需要 登錄 才可以下載或查看，沒有賬號？立即注冊
×
本帖最后由 羅蓋仙 于 2013-2-26 21:23 編輯 : ^7 U/ n' G) \4 |" ?+ T1 Z
9 ?9 Q& K# ~3 r2 q& P& r求最大公因數？" i: n6 E5 J( K) z
求最小公倍數？
2 F6 [/ w5 {3 E
& Q$ _7 d$ c/ b6 I. G#1=45.
2 M' U" x" E( s' M/ u( F0 S#2=36.- e, O8 `- T# b- N( g
把#1和#2的最大公因數投入#4
' n+ W! x( U8 G2 K把#1和#2的最小公倍數投入#5
5 }- W& s5 ?4 v! h. m* t; q
; t7 L* F- j9 C# ~3 l7 v! f; q& ]#1的因數有哪些：分別放在#101～
) j# S: C2 C2 y' d8 [#13=101.
; V5 x1 K! s# c" `( {#15=1.(計數器，45去除以1-45的一半(就是1-22)能整除，分別放在#101～)( }4 Q- A/ n7 P6 O
WHILE[#15 LE FIX[#1/2.]]DO1
* m- W9 j2 u2 s$ |IF[#1 MOD #15 EQ0.]THEN #[#13]=#154 Q5 Y9 [; m2 M
#13=#13+1.
# S- L/ r% \! g u4 a#15=#15+1.) u: p6 `5 y% Z3 `( K
END1
+ M9 P. \! F0 C; {. A#[#13]=#1( N( f& \) I& s C/ w# ^: J
#15=#13
- ^7 q2 h8 p. G8 o
$ C+ n; _) Z1 Q4 ~6 n2 y v: qWHILE[#15 LE 101.]DO1(36去除以45的因數.能整除#1和#2的最大公因數就求出來了)& y s+ Q V. Q. I
IF[#2 MOD #[#15] EQ0.]THEN #4=#[#15]; |' z0 K! k% q, ?/ y
IF[#4 NE #0]GOTO1% G: _2 g; Y3 X, h% X
#15=#15-1.. h6 E$ ?$ R; p
END1
8 X/ E5 |& j& b+ S2 y1 P6 Y6 _N1 #11=#1/#4 (#11和#22短除法是一個像大L的符號)7 r- P% ]/ u3 L/ ~
#22=#2/#4# Q8 i6 f# X7 |* G
#5=#4*#11*#22(最小公倍數)
" I: Q( @- k6 x1 ]/ z& x+ }M0
% h" d7 U" V. Q) s; w1 R: I$ A3 S# }! D/ {1 ~! {8 o, [
P.S% W; _ V% f- J! ^7 Z
我想把#11.#22和#5的式子簡化成! W) P/ z: z- r5 i1 ^5 ?! _
#5=#4*[#1/#4]*[#2/#4]2 M- [( v: U& b5 C1 h4 }' L
我又想把#11.#22和#5的式子簡化成( L2 e3 o" c) f' d7 q
#5=#11*#22/#4 結束 & T3 h3 {2 Q/ j3 y4 ?0 ^7 j7 }6 X
|
|
/2 
|Archiver|手機版|小黑屋|若楓后處理論壇
( 蘇ICP備11015087號-1|
蘇公網安備32059002001368號 )
IP卡
狗仔卡
發表于 2013-2-26 21:19:24
QQ好友和群
QQ空間
提升卡
置頂卡
沉默卡
喧囂卡
變色卡
千斤頂
顯身卡
