|
|
马上注册，结交更多好友，享用更多功能，让你轻松玩转社区
您需要 登录 才可以下载或查看，没有账号？立即注册
×
本帖最后由 羅蓋仙 于 2013-2-26 21:23 编辑 7 j6 L" F" y+ F- \1 ^
* w5 P+ a: O: x" G4 m2 F8 n' R求最大公因數？
- N# w/ T$ c' [$ U7 f求最小公倍數？
1 |' B0 j3 `! @& J* }: H, f. b( ?
#1=45.
5 u) u6 n2 E2 H& w r) N7 Q: \#2=36.
. h: L5 U, c- U1 l- j把#1和#2的最大公因數投入#4+ T# F' X/ H/ P* x/ p9 y
把#1和#2的最小公倍數投入#5
( e8 k9 g. c2 e( F
5 Q: \. Q* E/ J* O2 t#1的因數有哪些：分別放在#101～8 k. F9 a8 x! J( R6 B
#13=101.( K: R' W$ b5 [7 C4 ?4 y; l) h' @2 \
#15=1.(計數器，45去除以1-45的一半(就是1-22)能整除，分別放在#101～)
2 ]) j; h1 ]" |5 U2 tWHILE[#15 LE FIX[#1/2.]]DO1. c+ N; o; t+ n3 h' d, \
IF[#1 MOD #15 EQ0.]THEN #[#13]=#15
2 K* v. Z- g' U: U/ V% r4 G# x* d#13=#13+1.
, m7 R/ ]0 @$ B#15=#15+1.
1 r' W; | \" g$ Y5 l& [END1' w2 [$ z/ r) c( a
#[#13]=#1/ G; n4 `2 T- p/ F
#15=#13
4 T2 h: z g. x; x! Q- f
7 m0 B- D. e0 g4 Y# K9 k& K: MWHILE[#15 LE 101.]DO1(36去除以45的因數.能整除#1和#2的最大公因數就求出來了)5 {& I4 {2 A! q& z( \
IF[#2 MOD #[#15] EQ0.]THEN #4=#[#15]
8 X% \ {3 p/ n" w* m; q- a' gIF[#4 NE #0]GOTO1* T+ O2 z4 E, [6 N& J/ x3 A; [
#15=#15-1.) D- R* R5 B) @
END1" f2 o! `- J) U
N1 #11=#1/#4 (#11和#22短除法是一個像大L的符號)% \& ^, E$ u9 J
#22=#2/#4" Z* [) Q$ M; @, Y/ g3 _. w
#5=#4*#11*#22(最小公倍數)
8 r) r* d( r+ b) rM0
- i$ W0 s! Q5 V4 J6 q; g& L; y/ C
3 G3 A' y+ u! l$ x. nP.S5 e) y6 L6 G% U- d# d4 ~' x
我想把#11.#22和#5的式子簡化成
4 f6 C0 s9 x* Q6 Q#5=#4*[#1/#4]*[#2/#4]
( L( F6 O# a4 |3 T9 B/ I8 w我又想把#11.#22和#5的式子簡化成
* I4 p$ W% q, h m% X' [; P#5=#11*#22/#4 結束 0 h! s- K. @& ?; g2 h
|
|
/2 
|Archiver|手机版|小黑屋|若枫后处理论坛
( 苏ICP备11015087号-1|
苏公网安备32059002001368号 )
IP卡
狗仔卡
发表于 2013-2-26 21:19:24
提升卡
置顶卡
沉默卡
喧嚣卡
变色卡
千斤顶
显身卡
