|
|
马上注册,结交更多好友,享用更多功能,让你轻松玩转社区
您需要 登录 才可以下载或查看,没有账号?立即注册
×
本帖最后由 羅蓋仙 于 2013-2-26 21:23 编辑 5 y( J! [3 E6 C9 Z! j! ?
}5 r2 F% S/ H2 X# n+ P. i求最大公因數?
+ \- A0 P1 M3 D0 a3 I" O求最小公倍數?
5 B- ^- ` N$ X8 G9 s) U% L. t" m) q2 j
#1=45.
3 K" \4 `1 \0 N; Y8 k4 n! E#2=36.0 G2 g( X7 g- |1 S h9 \" _. F0 v( t$ f
把#1和#2的最大公因數投入#4/ G4 n6 i/ ~3 L5 H
把#1和#2的最小公倍數投入#5
; m1 d( z' `! y0 n- q
! S2 G& x& f& x# ` C( u0 L#1的因數有哪些:分別放在#101~" M" J& M5 q8 ]" P& ]5 t6 Q l
#13=101.
' U' N- h% a, `6 m7 @' V" E#15=1.(計數器,45去除以1-45的一半(就是1-22)能整除,分別放在#101~)+ n4 f# S' y' D* a* ^; E3 r9 q
WHILE[#15 LE FIX[#1/2.]]DO1# k1 i( u( J6 k' s( G, V
IF[#1 MOD #15 EQ0.]THEN #[#13]=#15
$ A: _* {- s m% G#13=#13+1.
. w0 @: f) ^( J6 P3 U1 V/ `% H#15=#15+1.0 b4 |- u R: ?/ B: o# k; {
END1
5 e7 c! G* y6 {- Z5 c# u5 L#[#13]=#1" [& J+ Q: y: N# R6 r4 M7 W7 r
#15=#13
9 u, A: S( s& F+ y8 n9 z9 Q2 R) x
, q9 b, x+ Z, O; Z+ @/ |" g% NWHILE[#15 LE 101.]DO1(36去除以45的因數.能整除#1和#2的最大公因數就求出來了)0 V- M- b2 ~, _+ J' s; I
IF[#2 MOD #[#15] EQ0.]THEN #4=#[#15]
# L6 K8 N5 O" @: ] X) wIF[#4 NE #0]GOTO1/ k7 A) b' m& n0 Y' Z, ?6 R: D5 g* _
#15=#15-1.* r% |. O$ M0 w, H; h
END1/ j9 P4 e8 }0 S* `/ j
N1 #11=#1/#4 (#11和#22短除法是一個像大L的符號)& f) ^4 z/ }1 i
#22=#2/#46 V+ D: c& g3 T: y# S" S
#5=#4*#11*#22(最小公倍數)
, K& T8 i( j7 L$ K. w' pM0( g8 ~. ^. h) q0 r) L
: Q$ j( z$ \5 B$ r7 v! i Z. r/ H
P.S
8 O# o8 X+ x/ @. J我想把#11.#22和#5的式子簡化成7 Q( |( k& ?: f; a1 `0 J3 g2 G# v
#5=#4*[#1/#4]*[#2/#4]
9 ~/ u U& n5 T我又想把#11.#22和#5的式子簡化成
a1 y! y/ j* [$ M#5=#11*#22/#4 結束 + N! ]+ K7 ]& c% L! t; b& h2 y
|
|