高中信息技术算法与程序设计知识树教案学案

上传人:wuli****0220 文档编号:246666378 上传时间:2024-10-15 格式:PPT 页数:16 大小:490.50KB
返回 下载 相关 举报
高中信息技术算法与程序设计知识树教案学案_第1页
第1页 / 共16页
高中信息技术算法与程序设计知识树教案学案_第2页
第2页 / 共16页
高中信息技术算法与程序设计知识树教案学案_第3页
第3页 / 共16页
点击查看更多>>
资源描述
单击此处编辑母版标题样式,单击此处编辑母版文本样式,第二级,第三级,第四级,第五级,*,高中信息技术,算法与程序设计,知识树教案学案,东风一中信息技术组,算法与程序设计知识树,1.信息技术与电子计算机,2.,揭开计算机病毒的神秘面纱,3 编程序解决实践问题,4,我们的信息高速公路,1.5,网络技术与网站设计,1.6,计算机操作系统,退出,一,.基础知识(30%),1.程序的三种基本结构:,计算机硬件直接识别的语言,:,PASCAL,语言编译执行命令,:compile,4.Turbo Pascal,快捷键,Ctrl+F9,,,ALT+F5,。,5.,变量的四种基本类型,var,n:XX,6.,计算机通用的二进制编码,7.PASCAL,表达式运算符,SQR SQRT mod div,Succ,Pred,ORD,8.,布尔表达式,not(5 div 3=1),的值,().,1.Program t1(output);,Var i:integer;,Begin write(1,2);,writeln(3,4,5);,write(6);,writeln(7*8=);,writeln(9);,END.,二,写出程序运行结果40%,运行结果:,2 3 4 5,7*8=,9,2、program t2(input,output);,Var i:integer;,Begin,for i:=5 downto 1 do,write(*);,END.,运行结果*,3,、,Program t3(input,output);,Var m,n,t:integer;,Begin m:=8;,n:=m+2000;,m:=m+1;,Writeln(m:5,n:5);,If mn then,Begin t:=m;m:=n;n:=t end,Writeln(m=,m,n=,n),END.,运行结果,9 2008,m=2008 n=9,4.Program t4(input,output);,Var k,ch:char;,Begin FOR k:=c TO h do,begin,Ch:=pred(k),Write(ch);,end,END.,运行结果:,b c d e f g,5Var pref,lastf,ff,n:integer;,运行结果,2 3,5,8,13,Fibonacci,Begin,Pref:=2;lasft:=3;,Writeln(pref,lastf);,For n:=1 to 12 do,Begin,ff:=pref+lastf;,Pref:=lastf;,Last:=ff;,Writeln(ff:6),End,end.,6 Program t6 ;,运行结果,1 1,1 2,1 3,2 1,2 2,2 3,Var m,n:integer;,Begin,for m:=1 to 2 do,for n:=1 to 3 do,writeln(m,n);,End.,7 PRIME,7.Program t7(input,output);,Var P,k:integer;,Begin p:=889;,for k:=2 to p-1 do,begin if (p mod k=0),then writeln(prime,no);,break;,end,End.,三、找出程序中的错误,并指出错误原因(6%),PROGRAM T9(input,output),VAR m,n:integer;S:real;,BEGIN,read(m,S);,n:=m+S;,writeln(n:10:2),END,2.找错误,PROGRAM T10(input,output);,VAR x,y:integer;,BEGIN,Readln(x);,If x0 then y:=1;,else y:=0,else y:=1;,writeln(y,f),END.,常见错误:,结束符.,分号 ;,未加说明的变量,IF/ELSE 格式,类型相容性,单、双场宽,四、,程序设计,(8+9+3=20),1计算S=1+2*2+3*3+4*4+25*25,2邮费根据路程的折扣:,(a金额,R折扣),a 500 元 R=0%;,500a1000 R=5%;,1000a=90 且 S=90,T F,打印 PASS,Y+S185,T F,输出pass,打印fail,杨辉三角,VAR I,j:integer;,Begin,For i:=0 to 10 do,begin,C:=1;,Write(c:40-i*3);,For j:=1 to i do,c:=c*(i-j+1)div j;,Write(c:6);,Writeln;,End;,End.,
展开阅读全文
相关资源
正为您匹配相似的精品文档
相关搜索

最新文档


当前位置:首页 > 图纸专区 > 课件教案


copyright@ 2023-2025  zhuangpeitu.com 装配图网版权所有   联系电话:18123376007

备案号:ICP2024067431-1 川公网安备51140202000466号


本站为文档C2C交易模式,即用户上传的文档直接被用户下载,本站只是中间服务平台,本站所有文档下载所得的收益归上传人(含作者)所有。装配图网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对上载内容本身不做任何修改或编辑。若文档所含内容侵犯了您的版权或隐私,请立即通知装配图网,我们立即给予删除!