如何用宏程序來(lái)計(jì)算這道數(shù)學(xué)題

ayun918

果然是：高手一出手，便知有沒(méi)有！
( l* t- y, Z+ E. i3 F& p$ ^) g別人送我3個(gè)學(xué)習(xí)錦囊
1，實(shí)力派
2，偶像派
: p( q2 E3 g$ b3，蛋黃派
我挑哪個(gè)好呢？

wbx8484

該死才注冊(cè)幾天的賬號(hào)丟了密碼，重新注冊(cè)。。。
  A: X% k) f5 @" P/ P思路：該蘋(píng)果的總數(shù)最小值是唯一的。
: s: t6 [% D  h4 a% C: A就是5的倍數(shù)于1，判斷余數(shù)1是關(guān)鍵。
0 T  D7 F. C; c' v* Z- {1 c得出最后一次的總數(shù)就可以知道第一次的總數(shù)。
- I9 c5 a" W+ s3 z  R0 _
西門(mén)子840D
9 Q! B' o  p/ ?$ ?. s4 n
$ g6 \: j6 G# c6 W% R6 S; K( O4 G: AR1=1    總數(shù)的意思（總數(shù)從1個(gè)開(kāi)始計(jì)算)
: q2 F3 G) k! F7 TAA:           標(biāo)簽1
R2=R1-(R1-1)/5-1  開(kāi)始分
R3=R2-(R2-1)/5-1
9 ^2 j* _. E* ~" n! D/ r3 eR4=R3-(R3-1)/5-1
+ w# D% t+ l% m, BR5=R4-(R4-1)/5-1  最后一個(gè)人分的總數(shù)
R1=R1+1               累加
R6=1                     倍數(shù)
BB:              標(biāo)簽2
8 b% z' Z  P$ j: S: T- rR7=R5-5*R6       對(duì)最后最后的總數(shù)進(jìn)行減5的倍數(shù)
R6=R6+1            倍數(shù)累加
IF R7<1 GOTOB AA      對(duì)余數(shù)判斷小于1 返回標(biāo)簽1
IF R7>1 GOTOB BB      對(duì)余數(shù)判斷大于1  返回標(biāo)簽2
M30

這個(gè)程序在機(jī)器上求答案（求 R 值），機(jī)器竟然報(bào)警位數(shù)不夠。
5 V: b+ [0 B9 {3 j0 {/ T. n4 ~6 d# n所以先把程序發(fā)上來(lái)，向版主求證。。。

dddqmq

1 W& s6 H. ?+ J# F/ I, o( v8 ?1 L#1=1.
" I+ H1 N& A- Z7 `# E' sWHILE [#1] DO1
#2=1.
  y3 S4 _# ~. k* g( `" I* C#3=5.
WHILE [#2 LE #3] DO2
3 G; H8 A& s3 m6 v5 n5 z" h  A! F9 }#4=[#1-1]/5.
#5=FIX[#4]
7 \! T4 g, \% NIF [#4 NE #5] GOTO1
" A7 _) z* b0 R2 O, R#2=#2+1
( p: r; {/ E+ f. C" Q1 [END2
N1
IF[#4 EQ #5] GOTO2
#1=#1+1
7 j9 [% C) Q# h4 hEND1
3 a6 c  {4 d4 zN2

dddqmq

說(shuō)一下個(gè)人的思路，拿一堆蘋(píng)果5個(gè)人來(lái)分，先拿掉一個(gè)，如果分到一個(gè)整數(shù)就繼續(xù)直到分完5次，如果還沒(méi)有分到5次就出現(xiàn)分不到整數(shù)，總數(shù)加1在來(lái)分。一旦到第五個(gè)人分時(shí)還能得到整數(shù)個(gè)蘋(píng)果，結(jié)束，

jiangssli

2 O! J: V. x7 D9 P, o# X! X  V1 @2 L回復(fù) 13# dddqmq
+ a! O0 {; r0 A: H7 }8 S9 v4 _
& T, y+ _3 l8 }4 Y) n0 ]) Z2 ^
, D" F# N% \* M8 v* j  s   
0 G7 t0 }) d- Y* R1 S: F/ L第一個(gè)WHILE沒(méi)有判斷,怎么循環(huán)呢?
還有后面IF判斷調(diào)準(zhǔn)的NG應(yīng)該改成NE吧!

dddqmq

回復(fù) 15# jiangssli
* G/ f+ Y6 }% `6 T; P
) f/ x0 s5 N, `$ `6 w/ ?$ E
    NG應(yīng)該改NE，抱歉我寫(xiě)錯(cuò)了，第一個(gè)WHILE是一個(gè)死循環(huán)，只要#1不等于零就會(huì)執(zhí)行，但我有用GOTO2跳出。

wujwz

以后需再關(guān)注，現(xiàn)在先幫你頂一下


# B  F2 `7 _* z. V, Z+ }, ^
8 b0 J: V6 a; i& d* x4 F

% n$ h2 J# J$ b, o) j



/ M0 C4 O1 }& D2 o  T
; S2 W; }6 J9 w" R) b* o  g
% o" }0 P  ?' @: j* j, g" khttp://discuz.net/static/image/common/sigline.gif
0 t7 X  {; f/ a加盟寬福量販商城kuanfuhuo.com，創(chuàng)建自己的商圈，QQ1697404576

; P* z9 V2 ]/ O5 v% U$ P3 ]' E8 |寬福商城，男裝、女裝、羽絨服，還有鮮花蛋糕送上門(mén)

  l2 q& h+ C: v  f+ Ghttp://kuanfuhuo.com/ImgUpload/2011072319584644_50x520.jpg寬福商城，{網(wǎng)店代理}，提供貨源，一件代發(fā)

winnertu

高手啊！！！

dlxuxi

講得有道理啊

dq-lb

回復(fù)  zhousj225
呵呵，你沒(méi)有理解到樓主的用意，雖然這道題可以用數(shù)學(xué)算出，但是他的要求是用宏程序?qū)崿F(xiàn) ...
wmj820303 發(fā)表于 2011-6-17 22:21 http://postp.net/images/common/back.gif

; }6 k) U& n& D8 k  i8 O5 [% o% ~6 H
' B  M6 N, m. ^( N- [
    受益匪淺