|
|
马上注册，结交更多好友，享用更多功能，让你轻松玩转社区
您需要 登录 才可以下载或查看，没有账号？立即注册
×
本帖最后由 羅蓋仙 于 2013-2-26 21:23 编辑
# P2 |$ @+ K5 P. U* d* B+ Q' I) ?% z
求最大公因數？: Q' X$ L4 R3 c, u! t, ~1 S/ f
求最小公倍數？: D- \+ s' r% b" o4 z, J
2 d, Q. ^ s/ F- l& C; D#1=45.: D# s0 z6 {9 U: a+ C
#2=36.
3 ^4 ]. B! |6 |% X2 R F" v2 Z7 j& e把#1和#2的最大公因數投入#4
7 h$ ~$ m/ j& A6 t把#1和#2的最小公倍數投入#5
$ K( D2 b1 T8 d: R# B% e9 X, j5 b5 v) G
#1的因數有哪些：分別放在#101～
+ @9 G' r X& J' E% P% u S1 j#13=101.# t6 L, D* q \
#15=1.(計數器，45去除以1-45的一半(就是1-22)能整除，分別放在#101～). |6 `: C- T2 }& K; u* _- i
WHILE[#15 LE FIX[#1/2.]]DO1% r" y6 d. F: E `
IF[#1 MOD #15 EQ0.]THEN #[#13]=#15
3 e7 Z, K, d2 E$ t/ x1 W0 {( N/ z#13=#13+1.' V& }& Y! G5 F. W0 X
#15=#15+1.( A9 H5 s- N5 N; l: R5 w' {* V) P
END1
: C$ A3 y% l# c: g#[#13]=#1, F* [! ~' m7 ~: X; O6 z; ~4 o
#15=#13
+ {9 V7 }7 V; F a2 F' I4 @
! R) z+ M# l" y: b+ U% LWHILE[#15 LE 101.]DO1(36去除以45的因數.能整除#1和#2的最大公因數就求出來了)
: G. V: P0 k8 t# J9 b$ i3 dIF[#2 MOD #[#15] EQ0.]THEN #4=#[#15] Y0 i c* @$ H) N3 d6 p* \4 \
IF[#4 NE #0]GOTO1) p' I2 B/ w3 V' [- c! _
#15=#15-1." f$ c Z1 P7 N- W. n1 `# o
END1
9 q) Y6 W3 J' l. RN1 #11=#1/#4 (#11和#22短除法是一個像大L的符號)$ a/ h! Q# U' x! p
#22=#2/#4- J+ ^+ _ S) i) f3 [) P
#5=#4*#11*#22(最小公倍數)
: |- X7 e4 {! hM0
( y$ o4 |8 }7 b! p0 c: T R" |" l6 U4 r, } k& c4 f
P.S
- w6 G# n7 Q7 d: f6 K我想把#11.#22和#5的式子簡化成* @1 h) t! \0 u* h# f
#5=#4*[#1/#4]*[#2/#4]% @2 d. e$ z9 _: t* S! {
我又想把#11.#22和#5的式子簡化成$ h( {6 e% L w8 F4 G+ m* c
#5=#11*#22/#4 結束 ' S( j7 A9 ?1 f# K
|
|
/2 
|Archiver|手机版|小黑屋|若枫后处理论坛
( 苏ICP备11015087号-1|
苏公网安备32059002001368号 )
IP卡
狗仔卡
发表于 2013-2-26 21:19:24
提升卡
置顶卡
沉默卡
喧嚣卡
变色卡
千斤顶
显身卡
