|
|
马上注册,结交更多好友,享用更多功能,让你轻松玩转社区
您需要 登录 才可以下载或查看,没有账号?立即注册
×
本帖最后由 羅蓋仙 于 2013-2-26 21:23 编辑 6 O+ E l# l4 ~, J. B* E8 \7 H
1 ^/ B7 f% C( z; P8 n0 q- Q X0 u求最大公因數?0 M- b8 s1 U$ K( G. Q+ C6 B
求最小公倍數?
, s! K% F8 | C0 w5 ~' w& |/ |/ k) t* Q* C2 o! @
#1=45.' J( x2 j7 l' {: ~- r9 t* N3 S+ h% }
#2=36.
# Q# U4 w3 N6 B( y2 p1 U把#1和#2的最大公因數投入#4
1 i, c8 k. M% l% }6 F把#1和#2的最小公倍數投入#5* c# q; i/ O- A" a, u) k/ D
* [4 c" z6 z$ l) e, A/ q#1的因數有哪些:分別放在#101~
B$ C3 X" j5 [4 I8 {+ ]#13=101.
5 _( @; m5 [& w4 s% w#15=1.(計數器,45去除以1-45的一半(就是1-22)能整除,分別放在#101~)
* W$ A6 ^1 X+ O$ n; X8 QWHILE[#15 LE FIX[#1/2.]]DO1
) N! E* v' S. f2 f+ s; tIF[#1 MOD #15 EQ0.]THEN #[#13]=#15' V4 w6 j+ R! w% K( z
#13=#13+1.
& U7 c D" {( d# }- e2 n; Q#15=#15+1.
7 c! Y' j2 M! o% `END1
2 V9 m1 m6 z8 `: R! h& K#[#13]=#1
) S2 x1 G0 V) ]5 Y#15=#13; t& y" c; `+ V5 T
0 b4 t8 p+ j3 t T% G& QWHILE[#15 LE 101.]DO1(36去除以45的因數.能整除#1和#2的最大公因數就求出來了)) c9 c/ M' l/ |7 a( W4 V- t
IF[#2 MOD #[#15] EQ0.]THEN #4=#[#15]
4 a5 i5 J7 V4 |IF[#4 NE #0]GOTO1: \" l. Y7 z; v- k) l) L
#15=#15-1.
: V0 }" S u. i7 y k* N* q* @END11 }1 r+ X' u! @9 L: K4 S
N1 #11=#1/#4 (#11和#22短除法是一個像大L的符號)
! F! f S& t4 ?' s x; F3 b#22=#2/#4% M9 A" i1 c( Q3 O, ?2 J U3 G
#5=#4*#11*#22(最小公倍數)* o/ V9 H! h7 \( {. X2 Z2 |
M0
; m7 Q! c1 q: n' a4 D1 T
% B, H. ], H- ]9 s! T: vP.S
2 E% G2 Y/ J5 e我想把#11.#22和#5的式子簡化成; d- s* d" p( s$ w3 J
#5=#4*[#1/#4]*[#2/#4]
+ R9 @0 E1 u2 _. U5 l' R我又想把#11.#22和#5的式子簡化成
- H' H# _! t% v#5=#11*#22/#4 結束 4 s3 X7 l2 y6 T
|
|