找回密码
 立即注册

QQ登录

只需一步,快速开始

楼主: 千年

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

 火.. [复制链接]

0

主题

1

回帖

7

积分

新手上路

积分
7
发表于 2011-6-18 11:10:25 | 显示全部楼层
果然是:高手一出手,便知有没有!
6 M" f/ s5 J. R4 F# `4 Q/ [别人送我3个学习锦囊
! l7 |8 @: W5 D: V1 F0 f. R1,实力派" r. C! t. T# i7 g9 E
2,偶像派
/ @" H' y8 F5 t3,蛋黄派
7 S9 r8 l0 W( C7 }我挑哪个好呢?
回复

使用道具 举报

0

主题

1

回帖

4

积分

新手上路

积分
4
发表于 2011-8-21 00:51:10 | 显示全部楼层
该死才注册几天的账号丢了密码,重新注册。。。
- d; w/ r7 P  B$ z思路:该苹果的总数最小值是唯一的。
& O* o8 y* t- I7 ?- ^4 W7 p. v7 j0 e+ x) W就是5的倍数于1,判断余数1是关键。
: U2 ]1 ^4 H- @, X! a7 r& \- F得出最后一次的总数就可以知道第一次的总数。+ a3 s9 ~) P; E$ @
- A" o( ^7 {! s4 B& I' ^. Q
西门子840D - _3 V: N( G- m+ g: K

- N4 H. G" v5 w- t0 E* ER1=1    总数的意思(总数从1个开始计算)
- \3 r/ x' y; \; Q9 ~: N4 ^, o3 o4 GAA:           标签1
( \0 {# g. y" [0 rR2=R1-(R1-1)/5-1  开始分
( q& A; N, d- x# q" {8 `* _R3=R2-(R2-1)/5-10 a/ ]/ \# t/ j
R4=R3-(R3-1)/5-1$ ^8 Q. L# s# q$ C2 z
R5=R4-(R4-1)/5-1  最后一个人分的总数4 v7 O: m; S. t/ Y
R1=R1+1               累加( ^- [$ [+ O, p
R6=1                     倍数2 H1 }5 r7 E9 w+ y2 b, O
BB:              标签2
5 H) o8 r7 N4 Y" g5 fR7=R5-5*R6       对最后最后的总数进行减5的倍数  R4 k0 m" B& w" N; e" p
R6=R6+1            倍数累加
: G: \0 G6 H3 }1 X$ `- [7 l! eIF R7<1 GOTOB AA      对余数判断小于1 返回标签1% {% x- N0 W# |. h# E
IF R7>1 GOTOB BB      对余数判断大于1  返回标签2
, {5 v% b( ]  H# a' |M30
9 e( \3 ~4 i5 A* o" M
% V: s9 k/ e8 ]1 s0 o这个程序在机器上求答案(求 R 值),机器竟然报警位数不够。
$ s: G% O5 W/ y( N# d+ V所以先把程序发上来,向版主求证。。。
回复

使用道具 举报

6

主题

101

回帖

189

积分

注册会员

积分
189
发表于 2011-8-28 09:30:28 | 显示全部楼层
本帖最后由 dddqmq 于 2011-8-31 08:35 编辑 : G* u% x& g( B" U" `7 B
" I# |# f0 `( b( r
#1=1.
) H0 x, F' k: f/ d# r2 SWHILE [#1] DO1
7 G3 [4 n- b! E#2=1.' _  b/ W3 q) t
#3=5.) y- q0 \) {; p! W/ {. @0 q6 J6 S
WHILE [#2 LE #3] DO24 H1 W% L8 E7 z' j+ [4 h2 ^
#4=[#1-1]/5.
0 x" @/ ~  R% b$ z" L7 N#5=FIX[#4]1 d0 u' x. P! u! c( Y3 t; K4 @
IF [#4 NE #5] GOTO1* ~5 s6 T* T$ R
#2=#2+1
1 ~+ S; j, f( e  O7 WEND2* w7 @, T: @9 f+ i' H
N1% s6 q$ G' q! U. o+ `
IF[#4 EQ #5] GOTO2* A2 {0 D+ n% s- N
#1=#1+1
% H( v7 p2 E% u2 S7 QEND1, t% s2 Y8 U3 |3 o, G+ }* Y: s  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 编辑 0 k+ k5 P; b9 ~& Z$ B, Z
7 V# G9 p1 d' h, W
回复 13# dddqmq ; [4 f1 t, `  B# `/ L

8 G( |. p+ B% a' g: f2 F2 }- ^
( L4 j* ]; U1 H9 s    $ ^! {7 B) q; \. A0 K
第一个WHILE没有判断,怎么循环呢?
  A& T1 i; a: N9 A' c还有后面IF判断调准的NG应该改成NE吧!
万能的主啊!! 请您一定保佑看帖不回帖的人的天天尿床!!!阿门!
回复

使用道具 举报

6

主题

101

回帖

189

积分

注册会员

积分
189
发表于 2011-8-31 08:33:25 | 显示全部楼层
回复 15# jiangssli
9 L5 {; V7 k1 z5 ~9 G  \' @0 x0 C( V$ I$ ]9 U6 ?3 J

, Z7 {6 T5 @1 S6 n) z    NG应该改NE,抱歉我写错了,第一个WHILE是一个死循环,只要#1不等于零就会执行,但我有用GOTO2跳出。
多轴加工,后处理
回复

使用道具 举报

0

主题

3

回帖

10

积分

新手上路

积分
10
发表于 2011-9-8 22:16:32 | 显示全部楼层
以后需再关注,现在先帮你顶一下
& D( j* T& T* s% o/ N) I. B
& c4 B/ {! I8 j% E1 Y2 |! ]* l& M! x% A# U8 v; ^( w+ q
' P! E$ e& g% i2 l

+ h6 b4 h& L( n/ G1 d/ R, G" @! N* m: G9 ~8 S. G; j
7 g+ _+ {4 ?' s/ v6 C9 Z* r
; c( Y! ~. k, y, x4 I" z

: c; w) t8 k! @. B5 I" W7 T8 |$ |6 K/ s5 Q3 p  T: @$ s

; |3 N7 O( e* t( W8 a$ S
; R3 L' U" T- ihttp://discuz.net/static/image/common/sigline.gif* t. V- G5 X8 C* a# _3 y, p! E
加盟宽福量贩商城kuanfuhuo.com,创建自己的商圈,QQ1697404576
% k5 O* L; w2 L( v. [, P: m& a- y; d$ b
宽福商城,男装、女装、羽绒服,还有鲜花蛋糕送上门+ G& O+ P7 A) b% d" p* A, r, c

9 E" T: C: h+ X0 i. {" ]) ^http://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 ! X8 O% x2 [1 j9 V
呵呵,你没有理解到楼主的用意,虽然这道题可以用数学算出,但是他的要求是用宏程序实现 ...
, Y4 F' X# L- Y- s. R7 R2 Q! |wmj820303 发表于 2011-6-17 22:21 http://postp.net/images/common/back.gif
- T  K! E: u- h4 @8 e. D; v) G0 M

3 g/ s3 S% k. m
% v6 o: K8 m7 `    受益匪浅
回复

使用道具 举报

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

本版积分规则

关闭

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

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

GMT+8, 2026-8-7 05:34 , Processed in 0.099822 second(s), 21 queries .

Powered by Discuz! X3.5

© 2001-2026 Discuz! Team.

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