|
|
马上注册，结交更多好友，享用更多功能，让你轻松玩转社区
您需要 登录 才可以下载或查看，没有账号？立即注册
×
本帖最后由 羅蓋仙 于 2013-2-26 21:23 编辑 " X S: X, j; J! A: R, Q" l- l* O, ^: d
5 q# O. G$ X2 l2 v) n7 l8 C, F
求最大公因數？7 Y/ f1 f, H$ [0 k- U
求最小公倍數？, l( x A* W- S; Y0 P
# O* T6 d2 p2 H6 P4 c. b4 i- |#1=45.
, T$ r. s4 o ?# ^! ^2 C+ e5 T#2=36.$ t- T4 u7 z, Z& ]/ ]- Y
把#1和#2的最大公因數投入#4+ s5 o! w) b# J5 W! A) g
把#1和#2的最小公倍數投入#5
3 i2 U: n3 F: [6 J& W1 _9 ]
5 o3 e4 h3 \9 T* P#1的因數有哪些：分別放在#101～3 |: u- G- x9 [+ l5 \/ H
#13=101.
' m/ z6 ^4 M6 R: \* w#15=1.(計數器，45去除以1-45的一半(就是1-22)能整除，分別放在#101～) p% `( D% Z7 G7 ]
WHILE[#15 LE FIX[#1/2.]]DO1) p) a: m" x) z# T1 n* f% r2 f
IF[#1 MOD #15 EQ0.]THEN #[#13]=#15
+ n% j$ V3 ~/ ?8 K" u; E3 X#13=#13+1.
. r& Z( h# n) T) Z: I9 Q F: c#15=#15+1.1 `' j; g: A5 W% y
END1/ ~, `7 p8 }2 J. ^7 X# M
#[#13]=#18 d: x# h0 c) ~! ?
#15=#13
* V: h4 `; V8 E6 [; ^/ Z& I! I/ P# T+ A4 N7 c2 Z- B* X+ K
WHILE[#15 LE 101.]DO1(36去除以45的因數.能整除#1和#2的最大公因數就求出來了)
2 r* W- X0 h _IF[#2 MOD #[#15] EQ0.]THEN #4=#[#15]
4 p1 z( G7 @9 k, }IF[#4 NE #0]GOTO17 j- t+ L/ o4 X3 N
#15=#15-1.
0 N( B$ }* x- N# y) [1 s% _2 fEND1
" v/ o) V9 ~7 X7 D4 NN1 #11=#1/#4 (#11和#22短除法是一個像大L的符號). }7 r1 L2 L( M1 G/ K: Y( c8 G9 e
#22=#2/#4, g9 Z# ?+ }- z9 {. e# V
#5=#4*#11*#22(最小公倍數)- I- F; O9 c$ C* Y& e& u+ z, Y
M05 k$ D0 N* _/ ^) [1 v7 r
3 C! N" `" L7 I) z' wP.S) `" j8 x; e( }' m$ ^ Y( g
我想把#11.#22和#5的式子簡化成
9 x: i3 ^8 l; A7 P' f | E+ e#5=#4*[#1/#4]*[#2/#4]
& a2 t* u+ |' C% ]我又想把#11.#22和#5的式子簡化成3 G0 @$ H1 T. I/ a# G
#5=#11*#22/#4 結束 # i3 Y0 s9 K4 ^0 x) \
|
|
/2 
|Archiver|手机版|小黑屋|若枫后处理论坛
( 苏ICP备11015087号-1|
苏公网安备32059002001368号 )
IP卡
狗仔卡
发表于 2013-2-26 21:19:24
提升卡
置顶卡
沉默卡
喧嚣卡
变色卡
千斤顶
显身卡
