|
|
馬上注冊,結交更多好友,享用更多功能,讓你輕松玩轉社區
您需要 登錄 才可以下載或查看,沒有賬號?立即注冊
×
本帖最后由 羅蓋仙 于 2013-2-26 21:23 編輯 3 _. x- t. b0 V! U2 N1 M+ @2 c$ y. [
' u) c' ?2 o- _ r K3 F求最大公因數?
# E! u5 z/ c4 G! l C* x求最小公倍數?
+ L9 [: {+ I. N8 _
' J, H5 {5 W4 g& ?#1=45.# f% S ~3 S+ f
#2=36.
; {+ i+ y( _! @8 _2 Z6 o" G( z把#1和#2的最大公因數投入#4
/ m. q1 J% i1 c3 h8 v& _把#1和#2的最小公倍數投入#5
& [/ @1 H! e- | j, F& k3 D: v/ E% o7 |4 V* A
#1的因數有哪些:分別放在#101~! F9 h5 N3 Z, X" X) U, C7 R
#13=101.
3 x. R9 i8 i! U. r! M#15=1.(計數器,45去除以1-45的一半(就是1-22)能整除,分別放在#101~)( P: ^& V6 r! A# k0 O" _
WHILE[#15 LE FIX[#1/2.]]DO1
% P. {! O" Z1 x# A$ s* j( W; ~IF[#1 MOD #15 EQ0.]THEN #[#13]=#153 d" V# V* U4 X6 [$ f
#13=#13+1.
8 }% \, y- p5 }8 t# C3 u8 O#15=#15+1. {! F1 r9 j9 X' D5 w- J6 l% r
END1$ V# z$ U. Q8 m7 L
#[#13]=#18 W' ~- F% _5 g. H) n
#15=#130 u; Y5 b! m% s+ H! b1 {* g
4 n2 | C9 x* b8 {; TWHILE[#15 LE 101.]DO1(36去除以45的因數.能整除#1和#2的最大公因數就求出來了)
& s9 |* v5 `0 s, C: P" H1 sIF[#2 MOD #[#15] EQ0.]THEN #4=#[#15]
c0 T1 U( a8 t% g; e6 @IF[#4 NE #0]GOTO1
* S8 t! l8 g8 J$ `+ v' ?- |#15=#15-1.
" n7 s0 h+ l( f6 u& u' mEND1
, l D" G# g% |( q) `/ E2 |N1 #11=#1/#4 (#11和#22短除法是一個像大L的符號)
; q n( e# Q8 \#22=#2/#4( S' \: x. P3 ~; [$ l
#5=#4*#11*#22(最小公倍數)" [/ p" U- j2 J- m0 O
M0
7 k9 y( _6 ?/ |. {$ A1 d9 Q
7 S7 Y% d! F! R0 MP.S9 x4 B' P0 j5 A# q# z7 ^
我想把#11.#22和#5的式子簡化成/ o- _# {+ G2 Z0 I* v: i
#5=#4*[#1/#4]*[#2/#4]
5 E. j2 z: G Y1 H我又想把#11.#22和#5的式子簡化成" o: v7 s3 L# k+ f; e7 T
#5=#11*#22/#4 結束
$ y8 D6 K, U, @8 O4 x |
|