版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领
文档简介
1、需要记忆的算法:-1 Pascal运算优先顺序1 not2 and */div mod3或xor-4 in=0.文件输入和输出:贝金Assign(input,P1 . in);Reset(输入);Assign(输出,P1 . out);Rewrite(输出);for I :=1-20 do readln(aI);sum 3360=0;For i:=1至20 do sum :=sum aI;Writeln(总计);特写(input);特写(输出);终端。1.少数判断:function ok(x : longint): boolean:Var i:longint:贝金For i:=2 to tru
2、nc(sqrt(x) doif x mod I=0 then exit(false);结束(真);End2.选择排序For i:=1至n-1 doFor j:=i 1 to n doif ajaIthen begin t :=aj;aj:=aI;aI:=t;End二进制枚举方法:Fillchar(b,sizeof(b),0);While b0=0 do贝金j :=m; m位是最低位。while bj=1 do dec(j); 从最低位开始查找非1的座位。bj:=1; 此位置1;for I :=j 1 to m do bI:=0; 将刚刚过去的1全部设置为0。已生成二进制数处理.End4.行:P
3、rocedure qsort(l,r:longint):Var i、j、x、t:longint:贝金I :=l;j :=r;x :=a(I j)div 2;Repeatwhile aIj; I与j相交;x已在交点处。if lr then exit(false);l与r交叉,表示找不到。mid 3360=(l r)div 2; 获取中间位置;if x=amidthen exit(true); X找到与此位置相同的数目!If xa mid then exit (find (x,mid 1,r);X大于位置数时,在右侧查找(重复)。End6.高加林:I :=1;x :=0;Fillchar(c,si
4、zeof(c),0);While (I=la)或(I=lb) do I小于a或b长度的一个循环;贝金cI:=aIbIx; I根据指向的人员添加到c数组中(包括前导舍入x)。x :=cIdiv 10; 将该位置的舍入导入到x。cI:=cImod 10; 留下未四舍五入的部分。I :=I 1;i加1EndcI:=x;记住最高位的四舍五入。if x0 then LC :=I else LC :=I-1;lc记录结果长度。7.高缩减:I :=1;Fillchar(c,sizeof(c),0);While i=la do贝金if aI1)do dec(LC);8.高精度乘法:Fillchar(c,siz
5、eof(c),0);For i:=1 to lb do贝金x :=0;For j:=1 to la do贝金cI j-1:=bI* ajx cI j-1;x :=cI j-1div 10;cI j-1:=cI j-1mod 10;EndcI j:=x;EndLc:=la lbWhile (c LC=0)和(lc1)do dec(LC);9、单精度乘法高精度(100!),以获取详细信息readln(n);c1:=1;l :=1;x :=0;For i:=1 to n do贝金x :=0;For j:=1 to l do贝金cj:=cj* I x;x :=cjdiv 10;cj:=cjmod 10
6、;EndWhile x0 do贝金Inc(l);cl:=x mod 10;X:=x div 10EndEndfor I :=l downto 1 do write(cI);10深度搜索算法步骤try(k 3360 integer,其他参数表);k表示深度贝金达到目标then begin处理目标;ExitEndFor i:=1至儿子数doIf儿子合法(包括边境判断)then贝金记录状态Try(k 1,传递其他参数);恢复状态EndEnd在“洪水”中使用该算法,无需目标处理、标记和恢复。整个程序结束后完成。11宽度搜索算法步骤bfs贝金初始化,排入初始状态伫列头:=0;tail :=1;设置头部和
7、尾部指针While headwi thenIf I-1,j f I-1,j-w I p I thenFi,j:=fi-1,jElseFi,j:=fi-1,j-wi piElseFi,j:=fi-1,j;Writeln(fn,m);(b)一维表For i:=1 to n dofor j 3360=m downto wIdoIf j w I thenIf I-1,j f I,j-w I p I thenFi,j:=fi-1,jElseFi,j:=fi,j-wi piElseFi,j:=fi-1,j;Writeln(fn,m);01背包和只有一个地方有渡边杏差异(请注意蓝色标记)(b)一维表(教科书
8、的一维算法好像有问题!),以获取详细信息For i:=1 to n dofor j 3360=wIto m doIf j b I,1) and (b j,2 l) thenbegin l 3360=bj,2;K:=j end32;b所有大于I,1的中间连接数都是最大的记录If L0 thenBegin b i,2:=L 1;B i,3:=k;End 连接1,k是旧节点连接End注意:bx,1原始系列,bx,2从x到n的最长序列的长度bx,3序列连接指针指向下一个节点的下标。用它可以找出最长顺序的所有元素。导弹、合唱大型、船舶问题的拦截都可以使用此算法。16文章旅行问题(数量p264)中国象棋的马从(x1,y1)到(x2,y2)有多少路?“马只能向右跑”地图x,y= 地图I,j地图x,y | (x,y)在边界内包含一组(I,j)可到达的(x,y)坐标激
温馨提示
- 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
- 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
- 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
- 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
- 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
- 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
- 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。
最新文档
- 五年级家庭奖惩制度
- 酒店员工服务奖惩制度
- 如何给自己制定奖惩制度
- 贵金属部门奖惩制度范本
- 工程机械考核与奖惩制度
- 氧气站安全生产奖惩制度
- 护士长如何落实奖惩制度
- 肿瘤病例上报奖惩制度
- 二年级奖惩制度积分细则
- 家具行业产品奖惩制度
- 秦皇岛地质考察报告
- 抖音取消实名认证申请函(个人)-抖音取消实名认证申请函
- 0~3岁婴幼儿营养与喂养(高职)全套教学课件
- 新闻写作的真实性原则
- 产业经济学-王俊豪主编
- 海岸工程海岸防护概论
- 静态与动态分析指标
- 《铁路技术管理规程》普速铁路部分
- YS/T 690-2009天花吊顶用铝及铝合金板、带材
- GB/T 4937.3-2012半导体器件机械和气候试验方法第3部分:外部目检
- GB/T 4456-2008包装用聚乙烯吹塑薄膜
评论
0/150
提交评论