|
|
马上注册，结交更多好友，享用更多功能，让你轻松玩转社区
您需要 登录 才可以下载或查看，没有账号？立即注册
×
本帖最后由 羅蓋仙 于 2013-2-26 21:23 编辑 % _; B% g7 h. q( o4 X3 d9 o Z, k- n
; }- K, J4 ]# I5 w0 S+ Y% ^
求最大公因數？
4 Z3 q7 v" y+ ~9 n+ `' |( |求最小公倍數？
* Q' M! T2 K3 x" k7 s" _7 s2 g( A, U' K. j0 U
#1=45.2 P! ]5 n3 S& `! V6 M) j s, ~
#2=36.5 w. l8 v# E B$ p
把#1和#2的最大公因數投入#4
l* q+ H' f4 a* L把#1和#2的最小公倍數投入#5$ y) |5 I( f2 v8 i( Z
# U) b/ c2 O3 [& w! a/ J& ]
#1的因數有哪些：分別放在#101～
$ N& d5 m: B6 b' m1 Y0 y#13=101.
T) b' S( J I* h8 G8 S8 e) c/ S#15=1.(計數器，45去除以1-45的一半(就是1-22)能整除，分別放在#101～)
# N0 n% R6 \2 [5 G. SWHILE[#15 LE FIX[#1/2.]]DO1
$ j, r% O+ b2 X7 TIF[#1 MOD #15 EQ0.]THEN #[#13]=#15
3 @! N* P; l `: H1 k( I' k#13=#13+1.
2 K7 v7 v! ~) N* ]$ z5 ~#15=#15+1.
/ N, s% F' \2 AEND1" U. b( F2 L7 v* O
#[#13]=#1$ F! a$ N; w8 f
#15=#13
) {: W4 K. I& c c; y; v! f1 H; W4 l, v' b, J$ L
WHILE[#15 LE 101.]DO1(36去除以45的因數.能整除#1和#2的最大公因數就求出來了); [7 D0 @% Z! _; @* Z N
IF[#2 MOD #[#15] EQ0.]THEN #4=#[#15]. q; K, a- Q! s/ ]7 s$ Y# m" U
IF[#4 NE #0]GOTO1
! `/ h1 _6 L0 i0 F( f#15=#15-1.
: j- S) I' Z. `- V' }9 EEND1
% L% O T! r# e) a. n4 f3 r* }# cN1 #11=#1/#4 (#11和#22短除法是一個像大L的符號)
2 B' p& a3 T. |) ^2 z6 D#22=#2/#4
# M8 K' ?& D1 u# m+ P$ O7 p#5=#4*#11*#22(最小公倍數)+ C- q: u2 N# u( P, I% X$ V
M09 {; O# b. R# ^3 t
/ p% o3 q% ~5 a. Z
P.S" b+ t0 N( o: m. }& B; G. G
我想把#11.#22和#5的式子簡化成: d- v: Y6 W9 t I4 i$ X. p% @9 W6 S
#5=#4*[#1/#4]*[#2/#4]
% Z* u% J1 M* A7 y C我又想把#11.#22和#5的式子簡化成5 R3 e. } k0 q6 C* D, t
#5=#11*#22/#4 結束
9 I0 y7 Y$ o" _. { |
|
/2 
|Archiver|手机版|小黑屋|若枫后处理论坛
( 苏ICP备11015087号-1|
苏公网安备32059002001368号 )
IP卡
狗仔卡
发表于 2013-2-26 21:19:24
提升卡
置顶卡
沉默卡
喧嚣卡
变色卡
千斤顶
显身卡
