|
|
馬上注冊(cè),結(jié)交更多好友,享用更多功能,讓你輕松玩轉(zhuǎn)社區(qū)
您需要 登錄 才可以下載或查看,沒有賬號(hào)?立即注冊(cè)
×
本帖最后由 羅蓋仙 于 2013-2-26 21:23 編輯
x4 X- a' A9 p6 t
5 `; m) i) o) I: w$ N- L! w求最大公因數(shù)?
' [& A7 c( `* U; l9 A: ^4 s' k求最小公倍數(shù)?
. d7 z: E7 M+ ~( r2 p
* H* @4 r( F2 n) V5 d% i. o' ?' s( E#1=45.- r7 w& K; P1 g3 ^! l0 T* h/ R
#2=36.( a s* M6 H1 O9 Z8 g7 ?+ B( D
把#1和#2的最大公因數(shù)投入#4' M+ R8 @; \2 U Y1 h
把#1和#2的最小公倍數(shù)投入#5
7 a1 V. N w% q* E
6 R: [* i' B4 E5 Y' a! A, \% N7 Q#1的因數(shù)有哪些:分別放在#101~
) ^: ]5 D; U( U! r#13=101.' w5 w P$ T# Q5 w3 X- o& U. j
#15=1.(計(jì)數(shù)器,45去除以1-45的一半(就是1-22)能整除,分別放在#101~)
) w! I: x) {6 A8 {: j( H# B: c+ ^WHILE[#15 LE FIX[#1/2.]]DO1
4 K' q O- _% u( oIF[#1 MOD #15 EQ0.]THEN #[#13]=#15
4 a! X* \8 s+ K/ I5 p# [7 B#13=#13+1.% n! p: z- m+ D5 V* X5 a
#15=#15+1.
% s# c! W2 _# _7 ^# r' M( s' MEND1
, x8 p0 x6 L$ [8 Z) u1 P+ s& I#[#13]=#1* S1 b7 F- z& x$ K% A
#15=#13. m! b! g0 U! ?
6 B* G9 \# I1 h+ d+ \- Z
WHILE[#15 LE 101.]DO1(36去除以45的因數(shù).能整除#1和#2的最大公因數(shù)就求出來了)4 t* p0 h6 e6 K9 O& n
IF[#2 MOD #[#15] EQ0.]THEN #4=#[#15]
' U& {3 Z1 R. `IF[#4 NE #0]GOTO19 ~; H ~) ^7 h. I5 [
#15=#15-1.
% o6 f* p9 y7 x) SEND1" C+ x0 [: I4 x( t# O% U b
N1 #11=#1/#4 (#11和#22短除法是一個(gè)像大L的符號(hào))
( `# N$ T4 m. O% k4 `#22=#2/#4
: }% o1 d/ I) M#5=#4*#11*#22(最小公倍數(shù))
5 O% r& n+ e0 [* T1 ]- M+ w" VM0$ J7 r' F6 O: ^) i
2 Y' u" s4 }! [, Y9 EP.S
- N/ n: m; \5 {' C" S( q. ^" ~, A0 w我想把#11.#22和#5的式子簡(jiǎn)化成& c6 W# D. S$ ^+ `3 d" A4 g
#5=#4*[#1/#4]*[#2/#4]
6 l' N- o8 m: r' T' e$ Y3 A9 A我又想把#11.#22和#5的式子簡(jiǎn)化成* v Z3 Z' F, K& u0 m6 s/ J: l& Z
#5=#11*#22/#4 結(jié)束 + s* j# C0 P# b3 P
|
|