|
马上注册,结交更多好友,享用更多功能,让你轻松玩转社区
您需要 登录 才可以下载或查看,没有账号?立即注册
×
本帖最后由 羅蓋仙 于 2013-2-26 21:23 编辑 7 z8 i, K# w# w' x9 g
) Z4 ^4 K( T* v5 `' e0 F. |0 R
求最大公因數?
% }* t! w' K- M* Z& u8 r& G& M& E求最小公倍數?
. k6 L5 x# J Z3 Q
# s) ?/ H, V! u#1=45.
2 x/ N3 E( [' H' ?) @#2=36.# e( W9 S- v8 L A# h0 d) W
把#1和#2的最大公因數投入#4; {& g/ F! X. \1 K, n# A
把#1和#2的最小公倍數投入#5 P* M6 d, a2 B* \8 [' Z
# w1 ?9 R: }7 N: P# A) B# D" z#1的因數有哪些:分別放在#101~
+ \4 j+ C9 F/ K! o" Y( h8 Q#13=101.9 Q3 e6 M$ [& p7 M
#15=1.(計數器,45去除以1-45的一半(就是1-22)能整除,分別放在#101~). k3 d. k1 {8 k
WHILE[#15 LE FIX[#1/2.]]DO11 ~; a6 a |0 e# N! O6 ?. P3 ]
IF[#1 MOD #15 EQ0.]THEN #[#13]=#15
$ ]; g6 ], G5 w1 N#13=#13+1.0 m5 T$ R* y: ^7 O9 M. j Z' D) B
#15=#15+1.
' ]0 X& V9 L0 ~/ [+ T: GEND1: K, u0 M9 G- f+ t
#[#13]=#13 U- U8 M2 n1 N" m' a9 @: z
#15=#13
; }( X% n- I4 q6 C. L( c; d
$ R& N, E! r! @9 D" d; ~WHILE[#15 LE 101.]DO1(36去除以45的因數.能整除#1和#2的最大公因數就求出來了)# {- D6 A7 m7 D6 e% n/ q0 W* [) v
IF[#2 MOD #[#15] EQ0.]THEN #4=#[#15]
7 b# i; p1 z. X8 l8 i$ uIF[#4 NE #0]GOTO1
, N" J/ d) Z0 U- l. T* ]8 W8 m#15=#15-1.
; f' @; n8 q4 vEND1- C, @( C: @1 \) x9 i& r! U
N1 #11=#1/#4 (#11和#22短除法是一個像大L的符號)
4 L% m! [: n8 Y- t. t#22=#2/#4
) R& i% o3 ?3 V3 \! |$ B! \3 K+ J5 Y#5=#4*#11*#22(最小公倍數)
3 F/ w1 o& u) b3 z$ W, N4 kM0
, @$ s, @2 b4 m* g) W% S h |/ E+ P) ^6 P3 K! U
P.S' G$ Q2 r2 d# \: z/ L
我想把#11.#22和#5的式子簡化成. n7 D1 ] n* k- {9 z: J
#5=#4*[#1/#4]*[#2/#4]6 F5 J7 O9 E. ^/ X# `
我又想把#11.#22和#5的式子簡化成9 D8 B! v- W3 B) c
#5=#11*#22/#4 結束
J+ M k& Q6 M& o |
|