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

ayun918

果然是：高手一出手，便知有没有！
/ R/ d  M5 ~  u7 W( }8 Y别人送我3个学习锦囊
1，实力派
6 u, Z) a% k# G: D  ~4 Z5 e$ d2，偶像派
3，蛋黄派
' q, r, s: T# c; b我挑哪个好呢？

wbx8484

该死才注册几天的账号丢了密码，重新注册。。。
' F0 l. \- `& S5 l, I思路：该苹果的总数最小值是唯一的。
就是5的倍数于1，判断余数1是关键。
得出最后一次的总数就可以知道第一次的总数。
7 y& |( m( x4 T: M2 J/ q' P
西门子840D
* D2 K+ M- M& |  ~5 D$ h: D! i! s
$ W& Z6 C9 B7 WR1=1    总数的意思（总数从1个开始计算)
AA:           标签1
R2=R1-(R1-1)/5-1  开始分
  q2 K3 X9 S  uR3=R2-(R2-1)/5-1
R4=R3-(R3-1)/5-1
R5=R4-(R4-1)/5-1  最后一个人分的总数
# u8 t) Y* o! W: `& k& }R1=R1+1               累加
R6=1                     倍数
) A" Y1 N  S4 U( r( t! tBB:              标签2
: g. J8 G0 J& X1 F8 CR7=R5-5*R6       对最后最后的总数进行减5的倍数
  _1 K. u3 o0 g3 d/ |' rR6=R6+1            倍数累加
: h8 F- k% k' o5 aIF R7<1 GOTOB AA      对余数判断小于1 返回标签1
1 }; u- }) n/ ^/ |IF R7>1 GOTOB BB      对余数判断大于1  返回标签2
M30

9 q, f" f1 X8 J3 g6 I' P- g/ h+ X8 F这个程序在机器上求答案（求 R 值），机器竟然报警位数不够。
: E8 ~+ s( y) M5 ?' \6 D5 i所以先把程序发上来，向版主求证。。。

dddqmq

9 q& g# R: a- P6 @- v
#1=1.
. W' M2 @# E  j6 P, tWHILE [#1] DO1
+ Z; n! M5 _6 i1 m#2=1.
#3=5.
" N% o( H! _, y, Z+ _WHILE [#2 LE #3] DO2
#4=[#1-1]/5.
#5=FIX[#4]
9 v% }4 f# x0 \/ qIF [#4 NE #5] GOTO1
#2=#2+1
END2
3 P/ j5 Z* D, b! |N1
# x" e8 E: L% Z/ G/ WIF[#4 EQ #5] GOTO2
#1=#1+1
END1
N2

dddqmq

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

jiangssli

0 x. t. |! W; p; Z" u# O
回复 13# dddqmq


+ A) y4 ^  Z  V* S2 Q0 w   
第一个WHILE没有判断,怎么循环呢?
0 M" v2 @1 W4 Z! p2 G' y5 W还有后面IF判断调准的NG应该改成NE吧!

dddqmq

回复 15# jiangssli
' _: D5 g9 Z+ e6 Y& g0 t% C
! S  N; Z/ f( [& e) b' q3 F
8 F; y0 P9 r/ l# J4 _    NG应该改NE，抱歉我写错了，第一个WHILE是一个死循环，只要#1不等于零就会执行，但我有用GOTO2跳出。

wujwz

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

1 \. P. Y- c+ }, m  \

$ O" B+ l+ J& v9 S! U3 k6 G- O! M8 R


! a$ n/ e$ v1 i5 H
# y* h5 x5 D& w
/ ^- d- [% v- k, }
/ H9 r2 A* u/ P
! ^$ E' `- e' O, }8 F( H) ?
& ^9 b) Z1 A0 L9 S- J( Ihttp://discuz.net/static/image/common/sigline.gif
7 O. o  ]& \! E1 O加盟宽福量贩商城kuanfuhuo.com，创建自己的商圈，QQ1697404576

宽福商城，男装、女装、羽绒服，还有鲜花蛋糕送上门
# W: m) L! W* {4 _% j3 a1 B
7 B- f* H9 x% k5 Ohttp://kuanfuhuo.com/ImgUpload/2011072319584644_50x520.jpg宽福商城，{网店代理}，提供货源，一件代发

winnertu

高手啊！！！

dlxuxi

讲得有道理啊

dq-lb

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

3 O& q& ], ?* r3 v9 p8 a5 F# T    受益匪浅