版权说明：本文档由用户提供并上传，收益归属内容提供方，若内容存在侵权，请进行举报或认领
文档简介
VB算法例题与解析常用类型符号：长整型Long&整型Integer%单精度型Single!双精度型Double#字符型String$逻辑型Doolean(又称布尔型)VB常用算法：产生随机数：Int(rnd*(终值-初值+1)+初值)例：输出10个随机数区间为[80,200]Fori=1to10C=int(rnd*121+80)PrintcNexti最大最小值：最大最小值须要两者比较,所以在做的时候要把随意一个值先定义为最大值与最小值然后用for循环来逐个比较。Max=a(1) 这里是第一步！将max与min赋值好用来做下面的推断这里是第二步,这里是第二步,推断A〔I〕的大小Fori=1to10Ifa(i)>maxthenmax=a(i)Ifa(i)<minthenmin=a(i)NextiPrintmaxPrintminVB冒泡法冒泡法是先拿出一个数字，然后一个一个推断过去.假设比他大,就放后面,比他小就放上面。冒泡法万能代码：Fori=nto2step-1Forj=1toj-1Ifa(j)>a(j+1)then---->从大到小是“<“从小到大是“>〞T=a(j)a(j)=a(j+1)a(j+1)=TEndifNextjNextiVB素数代码：素数的定义：除了1与该数本身之外，不能被其他任何整数整除的数。思路：先定义一个变量F=0做一个循环,推断能不能被除了1与该数本身之外能不能被整除假设可以F就变成1假设最终F=0则就是素数就输出它素数代码模板：N=val(text1)F=0Fori=2tosqr(n)---->sqr(n)也可以换成n-1,因为不能被1整除所以要从2开始循环这个就是检查除了1与本身之外能不能被整除，假设这个就是检查除了1与本身之外能不能被整除，假设被整除了。前面的标记F就变成1NextiIff=0thenprint“是素数〞水仙花数定义：其各个位数的立方等于改数本身思路：先要知道个位，十位，百位，怎么别离，别离出来之后推断个位：K\100十位：(K\10)Mod10百位：KMod10输出100-999的水仙花数代码Fori=100to999ABC取出之后他们三个的立方假设ABC取出之后他们三个的立方假设等于I则就是水仙花数。B=(i\10)Mod10C=iMod10Ifa^3+b^3+c^3=ithenprintiNexti其他算法：统计字符个数：总复习P292逆向文字：总复习P307模拟投掷骰子：总复习P289工资扣税问题：总复习P2872021高职考网页试题：参照如第92题图中的网页显示效果与详细要求，请在划线处用HTML语句将网页文件补充完好。详细要求如下：〔10分〕(1)将网页中的“失物招领登记表〞设置为三级标题，居中对齐；(2)图片位于当前文件夹内，文件名为“001.jpg〞，宽与高均为100像素；(3)程度线颜色为红色，粗细为1个像素；(4)单击“与我联络〞将发送电子邮件至“〞第一篇<html><head><title>成功街道失物招领资料库</title></head><body><h3aglin=〞center〞>失物招领登记表</h3><tableborder=“1〞align=“center〞><tr><tdRowspan=〞2〞><imgsrc=〞001.jpg〞height=100width=100></td><tdalign=“center〞width=“100〞>编号</td><tdalign=“center〞width=“100〞>20210301</td><tdalign=“center〞width=“100〞>物品</td><tdalign=“center〞width=“100〞>钱包</td></tr><tr><tdalign=“center〞>觉察地点</td><tdalign=“center〞>小公园</td><tdalign=“center〞>物品特征</td><tdalign=“center〞>无</td></tr></table><hr
温馨提示
- 1. 本站所有资源如无特殊说明，都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
- 2. 本站的文档不包含任何第三方提供的附件图纸等，如果需要附件，请联系上传者。文件的所有权益归上传用户所有。
- 3. 本站RAR压缩包中若带图纸，网页内容里面会有图纸预览，若没有图纸预览就没有图纸。
- 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
- 5. 人人文库网仅提供信息存储空间，仅对用户上传内容的表现方式做保护处理，对用户上传分享的文档内容本身不做任何修改或编辑，并不能对任何下载内容负责。
- 6. 下载文件中如有侵权或不适当内容，请与我们联系，我们立即纠正。
- 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。
评论
0/150
提交评论