|
|
马上注册,结交更多好友,享用更多功能,让你轻松玩转社区
您需要 登录 才可以下载或查看,没有账号?立即注册
×
本帖最后由 羅蓋仙 于 2013-2-26 21:23 编辑 0 `' f& I( I- T- _4 b5 v
9 M. T# J) E8 W# E' G. j8 ]求最大公因數?% N# D3 H" m2 Z
求最小公倍數?
/ q. P; y8 x4 Y+ K3 O \5 C+ d2 ]( }4 A1 A& N A6 I& Q) v
#1=45.
: \- h5 r$ g, P; |4 s3 P: x- [$ P#2=36.( Q, b' r0 e. V/ D9 k
把#1和#2的最大公因數投入#4
) p# x' R, B$ Q' I. d' }% T把#1和#2的最小公倍數投入#5 {6 W# Z# C$ y# A
2 k" T0 v( Y+ T2 E
#1的因數有哪些:分別放在#101~; l4 B8 A, `0 h% Z& ]2 ]- I
#13=101.
5 M/ O" B: D! }1 n# x. w) X# s#15=1.(計數器,45去除以1-45的一半(就是1-22)能整除,分別放在#101~)3 d+ y m' A& _$ o8 H
WHILE[#15 LE FIX[#1/2.]]DO1
, `0 p( \6 ]4 Q. E( o* J$ a+ a# O: KIF[#1 MOD #15 EQ0.]THEN #[#13]=#15
$ ]. i5 K" G+ f0 e#13=#13+1., t0 V+ ~/ ^, w
#15=#15+1.! ~8 Y3 V' Q( Z
END1
; V x- W/ _- u: a) L+ M#[#13]=#1
8 W R6 q9 s. n- U/ j3 i8 j#15=#13
' h8 V* w" u' n9 ?
9 W: t3 s% E0 T, h/ `( wWHILE[#15 LE 101.]DO1(36去除以45的因數.能整除#1和#2的最大公因數就求出來了)
7 n5 x& R3 ]/ Y+ TIF[#2 MOD #[#15] EQ0.]THEN #4=#[#15]
% Y1 \/ ?/ h& ]( a) LIF[#4 NE #0]GOTO1
! k9 O! c, O, t3 z8 |$ B#15=#15-1.
8 n2 ?8 u0 [ z( [END1
: w8 v# W1 o7 t5 }9 lN1 #11=#1/#4 (#11和#22短除法是一個像大L的符號)! H" A; `4 v8 N; k
#22=#2/#4% S* ^/ I5 B. L6 J2 _: b
#5=#4*#11*#22(最小公倍數)$ W7 u3 x* ~# g! P7 b: j
M0
; [2 B4 I4 H" I4 m2 [
- B e" L/ ?* N) MP.S) w! V5 K' e- J! `" w( s
我想把#11.#22和#5的式子簡化成 ^. B; ~ j7 Z( o6 B2 F
#5=#4*[#1/#4]*[#2/#4] k% z; \; F6 R$ ]/ P$ x
我又想把#11.#22和#5的式子簡化成8 w5 O- ?! m! t
#5=#11*#22/#4 結束 6 V/ q- m6 W' ^7 G* U$ n7 q. [
|
|