|
|
马上注册,结交更多好友,享用更多功能,让你轻松玩转社区
您需要 登录 才可以下载或查看,没有账号?立即注册
×
本帖最后由 羅蓋仙 于 2013-2-26 21:23 编辑
8 }, R. K- }2 H2 Z% X
" M/ x9 w9 W) F+ |求最大公因數?
8 v9 {7 s$ @9 l6 P6 X$ V求最小公倍數?
0 j1 U! m4 }% `2 ] Q* u
6 |' _" E% P( A#1=45.9 q; O; K- I- k3 R0 t
#2=36.) t7 J" {' ^/ O* w. Z- m# C
把#1和#2的最大公因數投入#4
. e* X! d8 r5 [$ p/ ?' g把#1和#2的最小公倍數投入#5! m! O6 e9 @& G \+ }
" X3 z" I/ v- G8 ]5 `% P4 D$ k#1的因數有哪些:分別放在#101~0 x4 ]1 ~6 v$ r) _; A- H, k4 b7 L
#13=101.
: U/ U" D7 [2 y; o) g# A1 u2 p#15=1.(計數器,45去除以1-45的一半(就是1-22)能整除,分別放在#101~)6 N% y" o: R( O. w4 r t, L6 L
WHILE[#15 LE FIX[#1/2.]]DO1
0 E. p) w/ }+ b1 h) I2 m# q+ R F* CIF[#1 MOD #15 EQ0.]THEN #[#13]=#150 N! G. K, U7 \# W. r% `
#13=#13+1.' y6 d! R2 k1 |" ~5 [- \
#15=#15+1.4 [- @$ @! e1 [ v$ O5 O7 J
END19 e: S$ [4 o7 p3 j
#[#13]=#1
6 ]$ p" t1 c: t0 w2 `#15=#13
f7 w; e: K- d4 Q' K& J
$ F! i# E- t9 A! R/ PWHILE[#15 LE 101.]DO1(36去除以45的因數.能整除#1和#2的最大公因數就求出來了)! G" D$ F S' ]
IF[#2 MOD #[#15] EQ0.]THEN #4=#[#15]3 M8 Z7 B+ c4 w: n. e D
IF[#4 NE #0]GOTO1
( L7 x$ w! a* A: t8 c7 ?6 ~9 O/ y#15=#15-1.8 v& i; ]+ Y$ y9 |4 }- ~
END1- x) W+ P% x9 W4 {. e
N1 #11=#1/#4 (#11和#22短除法是一個像大L的符號)- X- a- C. O( M0 ]1 |( j( H/ J: o
#22=#2/#4$ ], A; ]8 K4 J& r! X+ {
#5=#4*#11*#22(最小公倍數)+ A& W% D9 j) A6 q* o" G) ~
M0
1 n, ^* K- }* w
: x. J6 r, Z. q% h$ rP.S- R- Z6 g6 \! d4 V% N9 K$ }2 N
我想把#11.#22和#5的式子簡化成
+ O) m" t8 U! c$ K' k#5=#4*[#1/#4]*[#2/#4]
; B9 m( j) i. F% j. n4 I- ]4 J7 H我又想把#11.#22和#5的式子簡化成
3 a3 h- D4 V$ m#5=#11*#22/#4 結束
# F' J. l* p% b: t$ W' B2 C! B |
|