第一章第1节计算机解决问题的过程“韩信点兵”问题：相传汉高祖刘邦问大将军韩信统御兵士多少，韩信答说，每3人一列余1人、5人一列余2人、7人一列余4人、13人一列余6人……
刘邦茫然而不知其数
一、问题：“韩信点兵”问题1：求整除3余1、整除5余2、整除7余4的最小自然数
“韩信点兵”问题1：求整除3余1、整除5余2、整除7余4的最小自然数
分析问题(找出已知和未知、列出已知和未知之间的关系)写出解题步骤
1、设所求的数为X，则X应满足：X整除3余1X整除5余2X整除7余41、令X为1
2、如果X整除3余1，X整除5余2，X整除7余4，这就是题目要求的数，则记下这个X
3、令X为X+1（为算下一个作准备）
4、如果算出，则结束；否则跳转2
5、写出答案
“韩信点兵”问题2：求整除3余1、整除5余2、整除7余4、整除13余6、整除17余8的最小自然数
分析问题(找出已知和未知、列出已知和未知之间的关系)写出解题步骤1、设所求的数为X，则X应满足：X整除3余1X整除5余2X整除7余4X整除13余6X整除17余81、令X为1
2、如果X整除3余1，X整除5余2，X整除7余4，X整除13余6，X整除17余8，则记下这个X
3、令X为X+1
4、如果算出，则结束；否则跳转2
5、写出答案
二、用计算机解决问题PrivateSubCommand1_Click()DimXAsInteger,YAsIntegerX=1:Y=0DoIfXMod3=1ThenIfXMod5=2ThenIfXMod7=4ThenIfXMod13=6ThenIfXMod17=8ThenY=XEndIfEndIfEndIfEndIfX=X+1LoopUntilY>0Print"韩信统御士兵数：";YEndSub三、观摩要求：根据前面编制的程序，启动VisualBasic程序设计环境，输入程序代码，进行调试，最后得到运
