如何用宏程序来计算这道数学题

ayun918

果然是：高手一出手，便知有没有！
7 c5 P/ p$ W; U0 |, U别人送我3个学习锦囊
) l$ c: s7 Q. B0 z3 Y* z1 y1，实力派
) f1 u! z" V- Z: E2，偶像派
3，蛋黄派
- O; V  Y- |$ L- g- ]7 @我挑哪个好呢？

wbx8484

该死才注册几天的账号丢了密码，重新注册。。。
思路：该苹果的总数最小值是唯一的。
, K- C5 k- H' a  q, o6 [0 j- N就是5的倍数于1，判断余数1是关键。
得出最后一次的总数就可以知道第一次的总数。
+ J# b2 w/ I; v( M/ I
西门子840D
& c: U7 I. b  q# [7 g) L
R1=1    总数的意思（总数从1个开始计算)
AA:           标签1
R2=R1-(R1-1)/5-1  开始分
1 r: h4 {0 ], C/ R( d  I: b+ {R3=R2-(R2-1)/5-1
R4=R3-(R3-1)/5-1
  a/ A9 Z: o+ Q7 E+ oR5=R4-(R4-1)/5-1  最后一个人分的总数
R1=R1+1               累加
R6=1                     倍数
BB:              标签2
6 [. I/ ~) J/ |0 R' Z* }R7=R5-5*R6       对最后最后的总数进行减5的倍数
R6=R6+1            倍数累加
0 U! Z3 u; V; X" v& ~IF R7<1 GOTOB AA      对余数判断小于1 返回标签1
IF R7>1 GOTOB BB      对余数判断大于1  返回标签2
8 @/ }. N1 u, {  k; C5 g: {M30

6 ^& u, q6 y4 s( }0 W3 @) h这个程序在机器上求答案（求 R 值），机器竟然报警位数不够。
: ]: \; Q" e0 B1 k& z) z所以先把程序发上来，向版主求证。。。

dddqmq

#1=1.
+ ?) ^/ Y& o$ V3 P' EWHILE [#1] DO1
8 c4 Q# Z8 o- X9 B5 E2 U8 ~+ Y#2=1.
#3=5.
5 b+ ~1 W& V3 IWHILE [#2 LE #3] DO2
# F* K! @: S2 v' [6 `. Y1 J#4=[#1-1]/5.
#5=FIX[#4]
7 K( Y3 w, u+ |9 K4 aIF [#4 NE #5] GOTO1
: T5 a) I9 \5 p* M2 K# ^( L- o#2=#2+1
END2
- _) |* E! W8 L8 T; {9 n# \N1
6 o( n% }( |; [! f5 fIF[#4 EQ #5] GOTO2
7 f. N9 z. _  F# U+ O$ t6 t: R! H#1=#1+1
END1
N2

dddqmq

说一下个人的思路，拿一堆苹果5个人来分，先拿掉一个，如果分到一个整数就继续直到分完5次，如果还没有分到5次就出现分不到整数，总数加1在来分。一旦到第五个人分时还能得到整数个苹果，结束，

jiangssli

. a/ l" V0 r1 Z# p9 o* G1 e
# _; X- w$ G( J8 b+ B3 k0 ?! |回复 13# dddqmq


( H3 K  X* v  E" _( L5 \   
! C1 \  [3 J2 @/ ?; m第一个WHILE没有判断,怎么循环呢?
; v4 p6 ^( \1 L6 b& ^9 w4 z还有后面IF判断调准的NG应该改成NE吧!

dddqmq

回复 15# jiangssli
1 D% ?+ c5 x) m
, p" H# m3 w: A* G: I
    NG应该改NE，抱歉我写错了，第一个WHILE是一个死循环，只要#1不等于零就会执行，但我有用GOTO2跳出。

wujwz

以后需再关注，现在先帮你顶一下

# {. ]* B  x) f/ F9 L9 C+ Z





6 B7 J) o9 X9 z& A& f/ t! D

& Z8 T) R$ G6 u, E, W

http://discuz.net/static/image/common/sigline.gif
加盟宽福量贩商城kuanfuhuo.com，创建自己的商圈，QQ1697404576
# ^7 d6 D* F+ i& z: p# }, d$ X8 }
宽福商城，男装、女装、羽绒服，还有鲜花蛋糕送上门
; B7 U3 P8 o  u7 B0 |5 `
3 ?4 l* |1 d, W1 i3 t. L! thttp://kuanfuhuo.com/ImgUpload/2011072319584644_50x520.jpg宽福商城，{网店代理}，提供货源，一件代发

winnertu

高手啊！！！

dlxuxi

讲得有道理啊

dq-lb

回复  zhousj225
呵呵，你没有理解到楼主的用意，虽然这道题可以用数学算出，但是他的要求是用宏程序实现 ...
wmj820303 发表于 2011-6-17 22:21 http://postp.net/images/common/back.gif

$ v" ^* a$ r/ d$ |3 z
: j0 e6 u+ t; u8 m( p0 [
/ C$ e# v' p  s/ F- N0 D    受益匪浅