Excel巧解韩信点兵问题
淮安民间传说着一则故事——“韩信点兵”:秦朝末年,楚汉相争。有一次,韩信将1500名将士与楚王大将李锋交战。苦战一场,楚军不敌,败退回营,汉军也死伤四五百人,于是,韩信整顿兵马也返回大本营。当行至一山坡,忽有后军来报,说有楚军骑兵追来。只见远方尘土飞扬,杀声震天。汉军本来已十分疲惫,这时队伍大哗。韩信兵马到坡顶,见来敌不足五百骑,便急速点兵迎敌。他命令士兵3人一排,结果多出2名;接着命令士兵5人一排,结果多出3名;他又命令士兵7人一排,结果又多出2名。韩信马上向将士们宣布:我军有1073名勇士,敌人不足五百,我们居高临下,以众击寡,一定能打败敌人。汉军本来就信服自己的统帅,这一来更认为韩信是“神仙下凡”、“神机妙算”。于是士气大振。一时间旌旗摇动,鼓声喧天,汉军步步进逼,楚军乱作一团。交战不久,楚军大败而逃。
操作方法
- 01
题目。
- 02
进入Visual Basic编辑器。
- 03
插入模块。
- 04
编程。根据题意得出结果符合3个条件:①3的倍数+2;②5的倍数+3;③7的倍数+2。联合①②得出:3a-1是5的倍数,联合①③得出:3a是7的倍数。所以取两个条件进行判断。3a+2就是所求结果。
- 05
关闭vbe,启动宏。
- 06
执行宏。
- 07
运行结果。
- 08
验证。
赞 (0)