找回密码
 立即注册

QQ登录

只需一步,快速开始

楼主: 千年

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

 火.. [复制链接]

0

主题

1

回帖

7

积分

新手上路

积分
7
发表于 2011-6-18 11:10:25 | 显示全部楼层
果然是:高手一出手,便知有没有!& S' f/ l0 k3 c# Y6 w/ D3 }
别人送我3个学习锦囊
4 \4 C3 Z4 \1 e, a) w1,实力派
! r: {1 F/ a6 `" B- ?2,偶像派" [( f5 u9 ], ~; d! u  @. [
3,蛋黄派
# U3 w/ b& i6 O/ V# X! M. d# @& y我挑哪个好呢?
回复

使用道具 举报

0

主题

1

回帖

4

积分

新手上路

积分
4
发表于 2011-8-21 00:51:10 | 显示全部楼层
该死才注册几天的账号丢了密码,重新注册。。。. B2 y* y! i  D* p" e0 a) x& g
思路:该苹果的总数最小值是唯一的。: N: m7 w1 J$ @+ c8 F8 l6 d! L( b
就是5的倍数于1,判断余数1是关键。2 a( D5 t2 W" a7 `& ~0 ?  j
得出最后一次的总数就可以知道第一次的总数。. C. x& S9 y8 C2 T" @% ~
7 e6 s: h# P' c" O. P8 n
西门子840D
) K. a; U' D2 q  U& f5 [' r1 Z& w5 d" {! ]
R1=1    总数的意思(总数从1个开始计算), r) F, o$ h" ?6 |. b+ V) I% K
AA:           标签1
7 G; ?, E% y$ Q" hR2=R1-(R1-1)/5-1  开始分% x5 m7 R8 c$ p
R3=R2-(R2-1)/5-1/ W, Y0 J  n) {0 n
R4=R3-(R3-1)/5-1
. e7 b, J8 t/ ^* A4 |R5=R4-(R4-1)/5-1  最后一个人分的总数% V! B( d5 Y- P5 e! |- `: p* H1 _
R1=R1+1               累加) Y# s7 |2 z# w+ ~
R6=1                     倍数2 u' C2 @' }- U3 r! O0 |  g+ T
BB:              标签2+ i5 ?+ x8 T. J4 l# a4 z
R7=R5-5*R6       对最后最后的总数进行减5的倍数
" d4 z6 Z/ A# k: Q! P# o% FR6=R6+1            倍数累加1 H9 W; V/ i0 y" d3 C, A
IF R7<1 GOTOB AA      对余数判断小于1 返回标签10 h) K" @! H' y& _& B) |
IF R7>1 GOTOB BB      对余数判断大于1  返回标签2
* n& w) N* S5 Z6 jM30; b0 D) E; _- H9 _$ t" D* y; R
$ y$ }, ^4 H/ m* k9 O3 x
这个程序在机器上求答案(求 R 值),机器竟然报警位数不够。
" c9 _( f0 @; [) q5 c" i) i所以先把程序发上来,向版主求证。。。
回复

使用道具 举报

6

主题

101

回帖

189

积分

注册会员

积分
189
发表于 2011-8-28 09:30:28 | 显示全部楼层
本帖最后由 dddqmq 于 2011-8-31 08:35 编辑
- i" g, |% n( H+ x! }2 T2 v, X! T' C; T
#1=1.
$ z" j/ G) m2 e5 H4 l1 pWHILE [#1] DO1
' |! v; ]8 a9 K' V9 R& E#2=1.
" ]3 l, d) v+ |9 g# X& d#3=5.* V( s& i7 a5 E! N% t9 k/ c" N% `
WHILE [#2 LE #3] DO2' V) i; D& R$ i1 P( g
#4=[#1-1]/5.7 v+ T, Y* R  {9 M. J0 V$ k
#5=FIX[#4]
9 V$ m  t$ v3 u* rIF [#4 NE #5] GOTO1& c# \" P6 i9 m: P
#2=#2+1
7 r, D  h) ^. R4 H+ ^( h2 x2 xEND2
( A' Y, Q) W6 R, C( s% wN1
# o3 F; e; b' u$ [( t2 @/ sIF[#4 EQ #5] GOTO2
; R, i/ W- Q6 H8 B#1=#1+11 ?8 i2 `/ r8 e+ w
END12 k  q% y* s# ]" ^3 Z. O) s
N2
多轴加工,后处理
回复

使用道具 举报

6

主题

101

回帖

189

积分

注册会员

积分
189
发表于 2011-8-28 09:44:56 | 显示全部楼层
说一下个人的思路,拿一堆苹果5个人来分,先拿掉一个,如果分到一个整数就继续直到分完5次,如果还没有分到5次就出现分不到整数,总数加1在来分。一旦到第五个人分时还能得到整数个苹果,结束,
多轴加工,后处理
回复

使用道具 举报

1

主题

123

回帖

923

积分

高级会员

积分
923
QQ
发表于 2011-8-30 08:38:44 | 显示全部楼层
本帖最后由 jiangssli 于 2011-8-30 08:40 编辑 9 c) M0 H9 u1 t. ]" ?, a, h
" j4 `9 H5 k( ~5 Q+ x/ H
回复 13# dddqmq 7 i7 c" T4 k& |
; D  N) l" _: E" Q1 F7 h
0 Q) G0 f, O: Q$ O$ t
    ( x; S) {8 V, V% \' \  w9 a$ C
第一个WHILE没有判断,怎么循环呢?
5 ^0 R( A5 q) d; }还有后面IF判断调准的NG应该改成NE吧!
万能的主啊!! 请您一定保佑看帖不回帖的人的天天尿床!!!阿门!
回复

使用道具 举报

6

主题

101

回帖

189

积分

注册会员

积分
189
发表于 2011-8-31 08:33:25 | 显示全部楼层
回复 15# jiangssli & I8 s# p; p, L! r. p. u# ^7 g
) v7 L" x7 `; K3 k2 D7 S
9 f8 b  V% P0 G! s
    NG应该改NE,抱歉我写错了,第一个WHILE是一个死循环,只要#1不等于零就会执行,但我有用GOTO2跳出。
多轴加工,后处理
回复

使用道具 举报

0

主题

3

回帖

10

积分

新手上路

积分
10
发表于 2011-9-8 22:16:32 | 显示全部楼层
以后需再关注,现在先帮你顶一下9 W) ^+ q$ `1 @4 x

: O8 V5 E8 Y; T* h: k6 ~- ?! Y3 E+ m$ v; N% T& H2 C" U4 ^

. l9 a# |$ }- t/ o2 l
* E( m7 ^# D# @( W1 x
/ j3 }; y1 h, a8 U$ K# W4 |: M
6 G: g2 A/ n5 c$ Y) z- Z$ q( k/ v1 s+ b3 @) W  O

: p, R7 v7 D+ x, e9 b0 N2 d! Z# _$ p6 X  r6 N* d

' X% `" w4 @6 k0 Y9 a* j9 z  ~
3 D! t2 H4 x  M% Qhttp://discuz.net/static/image/common/sigline.gif
( i0 b# c- u5 v+ P& a加盟宽福量贩商城kuanfuhuo.com,创建自己的商圈,QQ1697404576  t5 A; E# ]4 Y) M- _5 f4 G  ?, P4 t
5 x2 ^( m. f4 {+ L) ]  X( y. w: L, L; f
宽福商城,男装、女装、羽绒服,还有鲜花蛋糕送上门
/ Q. g  Y( a& U% D8 [/ C% K
) n- }9 z, a) ihttp://kuanfuhuo.com/ImgUpload/2011072319584644_50x520.jpg宽福商城,{网店代理},提供货源,一件代发
回复

使用道具 举报

10

主题

192

回帖

286

积分

注册会员

积分
286
发表于 2011-9-9 13:14:55 | 显示全部楼层
高手啊!!!
回复

使用道具 举报

0

主题

12

回帖

34

积分

注册会员

积分
34
发表于 2011-9-22 21:48:11 | 显示全部楼层
讲得有道理啊
回复

使用道具 举报

1

主题

6

回帖

14

积分

新手上路

积分
14
发表于 2012-3-20 23:17:19 | 显示全部楼层
回复  zhousj225
# y; X! Y$ r& G% Q呵呵,你没有理解到楼主的用意,虽然这道题可以用数学算出,但是他的要求是用宏程序实现 ...
' S1 L4 R7 j+ i/ v8 n7 ?. y( h) Hwmj820303 发表于 2011-6-17 22:21 http://postp.net/images/common/back.gif

! L- e1 e7 h& W, E$ g& D
" O% n6 z( n' E) |' P; c1 J+ @" ?$ ]4 r; d8 G$ y
    受益匪浅
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

关闭

站长推荐上一条 /2 下一条

QQ|Archiver|手机版|小黑屋|若枫后处理论坛 ( 苏ICP备11015087号-1|苏公网安备32059002001368号 )

GMT+8, 2026-10-18 11:47 , Processed in 0.193094 second(s), 21 queries .

Powered by Discuz! X3.5

© 2001-2026 Discuz! Team.

快速回复 返回顶部 返回列表