|
|
马上注册，结交更多好友，享用更多功能，让你轻松玩转社区
您需要 登录 才可以下载或查看，没有账号？立即注册
×
本帖最后由 羅蓋仙 于 2013-2-26 21:23 编辑
/ f I$ H5 i7 y) h' P
. G9 Q; u" _8 D! G9 o# Q! X) i& g2 C求最大公因數？4 M% w5 @& ?& P! @3 j
求最小公倍數？
. L0 P9 Q6 o( h* K- L9 c- N0 t% d; W( ?! n( q" m
#1=45.
! i- G0 h* K/ G0 E0 m$ w#2=36.
% [0 p: w' D) O/ U) N9 f把#1和#2的最大公因數投入#4
* H5 G( {3 Y0 _: |2 P: n把#1和#2的最小公倍數投入#5( G$ h$ ?' O! t5 P' F
/ F0 x9 @6 k" D* x( I4 T#1的因數有哪些：分別放在#101～
. P" M4 [7 i. V* `#13=101.% O9 ~$ D4 h6 H
#15=1.(計數器，45去除以1-45的一半(就是1-22)能整除，分別放在#101～): G7 ?6 f" Z- v7 Y$ c$ R
WHILE[#15 LE FIX[#1/2.]]DO1: I% \3 u% t. w5 R& @& N' e' l( ]
IF[#1 MOD #15 EQ0.]THEN #[#13]=#15' C; p$ w" u* K: |- E$ [
#13=#13+1.- V5 i: U2 ]5 S2 b' H/ D9 w4 y
#15=#15+1.
! f% Q* E, \) {( w& L: `END1
R% {9 Q. @2 D# @7 |' X#[#13]=#1
5 |+ r/ r6 l* G" G( e% F#15=#13( k3 I& F4 c! P3 D+ H- b% [2 @
) \5 A! T7 J3 i! C" S9 F1 Z6 g: ^( y
WHILE[#15 LE 101.]DO1(36去除以45的因數.能整除#1和#2的最大公因數就求出來了)
7 _2 s! s( `* RIF[#2 MOD #[#15] EQ0.]THEN #4=#[#15]" K1 j7 n6 V. C1 O* h* u
IF[#4 NE #0]GOTO1, P- W3 ?. B3 I' f# A6 L
#15=#15-1.0 K4 `' |" B! p, B) Y6 M" n
END1* I; \* @: l5 G$ r
N1 #11=#1/#4 (#11和#22短除法是一個像大L的符號)
4 W, Y" r. O8 I8 `, W0 n' }+ B#22=#2/#4' X/ |+ N/ X* k# t$ u" l& X' `3 o
#5=#4*#11*#22(最小公倍數)5 Q# n7 i' f; }) h: ~; m
M0
2 A- L, j7 ~; E9 `2 ^# r; n0 z( y% T6 x( H+ s
P.S+ M1 C; a% l8 L$ k& \! H P
我想把#11.#22和#5的式子簡化成1 \& e; ~, T7 ~- ~3 J' z: Z
#5=#4*[#1/#4]*[#2/#4]
?3 W" x: S0 c3 n& h& r+ v! C我又想把#11.#22和#5的式子簡化成
; r# f! p( ?2 y, c/ {#5=#11*#22/#4 結束 5 r4 X- ^1 }$ d* }( a
|
|
/2 
|Archiver|手机版|小黑屋|若枫后处理论坛
( 苏ICP备11015087号-1|
苏公网安备32059002001368号 )
IP卡
狗仔卡
发表于 2013-2-26 21:19:24
提升卡
置顶卡
沉默卡
喧嚣卡
变色卡
千斤顶
显身卡
