|
|
马上注册,结交更多好友,享用更多功能,让你轻松玩转社区
您需要 登录 才可以下载或查看,没有账号?立即注册
×
本帖最后由 羅蓋仙 于 2013-2-26 21:23 编辑 2 M+ z4 w/ h! j" o! Z# @
+ n( p( z0 c5 Y- d求最大公因數?
8 o9 }& F$ S! K; `- Q求最小公倍數?: Q; y4 Q! c( Q+ C% H% r- M: D8 `" ]
0 f/ R) f ?7 o1 g& Y9 x2 t0 Y#1=45.% Y8 p; d4 Y2 a+ ^7 F C- C2 N9 u
#2=36.
4 o# F, C' G' ~把#1和#2的最大公因數投入#41 l( t. W2 ]: u+ |4 S0 m4 e8 E
把#1和#2的最小公倍數投入#5# G( l$ y1 v1 \ t( m
" }6 c% W: f u3 F( E! A* Y! P( ]& L
#1的因數有哪些:分別放在#101~! c% r3 |" ~9 T1 c+ f1 @
#13=101.# Y) b, @4 F# Q2 q
#15=1.(計數器,45去除以1-45的一半(就是1-22)能整除,分別放在#101~)
# f& v( b, n3 q; l" k- zWHILE[#15 LE FIX[#1/2.]]DO1
: F3 h+ f) U. I8 i$ N4 n4 n' g& z: FIF[#1 MOD #15 EQ0.]THEN #[#13]=#15% e+ q4 n$ E$ s5 Z t" G
#13=#13+1.7 t. N! j6 q3 d9 q, O$ Z
#15=#15+1.
. R! m+ m4 W5 N. Q! K, Q4 l+ NEND10 g4 K& N' m; a/ _+ a
#[#13]=#1
* P0 c8 G& a( W# p#15=#13
+ o4 D y0 F" j- O; Q
1 j4 Z7 k7 W Y i; sWHILE[#15 LE 101.]DO1(36去除以45的因數.能整除#1和#2的最大公因數就求出來了)
+ y7 E7 {, _5 pIF[#2 MOD #[#15] EQ0.]THEN #4=#[#15]- Z$ u) m9 R! Z- s0 N v, w
IF[#4 NE #0]GOTO1. H5 S+ g- ^# `9 o8 S
#15=#15-1.- ^+ K: Y2 u. |) [
END12 X; q# l" a$ h7 r9 n, R4 }1 _& O
N1 #11=#1/#4 (#11和#22短除法是一個像大L的符號)
, ~) c( F" V% N#22=#2/#4
1 M a6 O O& {#5=#4*#11*#22(最小公倍數)4 c4 r; S: M @8 w
M0- m( a N3 ]8 x
1 k, L6 d* f# [, k3 ]7 n1 NP.S
1 ~) w$ x3 i9 A8 C我想把#11.#22和#5的式子簡化成
/ [. U9 a" v2 K8 V/ R3 d! X5 ~/ N#5=#4*[#1/#4]*[#2/#4]
% N: {) u, f$ c# T& l我又想把#11.#22和#5的式子簡化成
8 C. _* W9 `8 q- {& ^/ F: P9 D+ l5 `#5=#11*#22/#4 結束
: Z# o E$ y! v' w& H |
|