pascal教程自学完整版

Pascal教程Ŀ¼?????????第一章第二章第三章第四章第五章第六章第七章第八章第九章算法、程衅与编译啤Pascal基础程衅趁毒佟⒆咏缬胧过程与变量集合、记录与文件指针等动态类别面膝元设计特效第一章算法、程衅与编译啤Ŀ¼?第一讲算法基础知识算法描狮?第二讲程性?第三讲Pascal编译啤第一讲算法基础知识算法描狮用计算机解臼问题的四歌?分吴，把实际问题抽匣搞性的数学难题?根据分舞计充解的方式和方法?用某些方式（如图形、自然语言、类计算机语言）表达以设计好的算法?在计算机上编辑、低测试编制好的程兄钡秸仿阄侍獾男枨算法的描狮??????例1.1.1：交换a、b两数值定义ca→cb→ac→bN-Sͼ?1973年，美国学者I.Nassi和B.Shneiderman提郴种在良中完全去堤线，全部算法写在一肝楷在抗可以包括其他考。?N-S图也被称为盒图籔IN图。N-Sͼ????功能臃；很易于确定局部和全局数据的谆可能任意转移控制；很易于表示嵌套关系及组件的层次关系。

N-SͼAPTABFA直到P直到型B循环顺序当P选择A当型第二讲程性编程语言????机圃汇编语言高级语言脚本语言第三讲Pascal编译啤编译器???????TurboPascal7FreePascal1.0/2.0CPPascalSuperPascalDelphi7.0LazarusGUIDETurboPascal7.0FreePascal快捷键????????F2Alt+EnterAlt+XF7F8F9Alt+F9Ctrl+F9????????保存全屏/小窗口转化关闭单步执行当前程胁街葱械鼻俺绦吵绦错耽导吵绦文件关联.pas.bak.o.exe.ppu.tpu第二章Pascal基础Ŀ¼?????第一讲第二讲第三讲第四讲第五讲Pascal语言特性、优点与劣势Pascal程泄Pascal基本符号、保镣标识符Pascal标准数据类别、常量与数组Pascal标准方程、过程、运算符与表达式第一讲Pascal语言特性、优点与劣势Pascal特点?以英国英语家命名的Pascal语言现已变成使用最广泛的语言之一，其重点有：严附峁够问剑环岣煌瓯傅氖堇嘈停辉诵效率高；查错能力强。

Pascal优点⒈结构化?Pascal可以便捷地书写彻化程锈就保证程旋确性和易读性。在结构化这一点上，比其他算法语言更好一些。Pascal优点⒉数据类别丰富?Pascal提供了整数型、实数型、字符型、布尔型、枚举型、子界型或者由以上类别组成的数组类型、集合类别、记录类型和文件类型。此外，还提供了其他许多语言中所没有的指针类型。丰富的数据结构和上梳构化性质，使得Pascal可以被方便地拿来描试拥乃惴āPascal优点⒊适用性好?既适用于数值运算pascal语言视频教程，也适用于非数值运算领有些语言只适用于数值计算，有些语言悦于商业数据处理和管控领觓scal的功能较强pascal语言视频教程，能广泛应用于胳域。Pascal优点⒋书写较自由?不烯算法语言这样对程虚写感严告定。Pascal允许一行写多镐，一镐可以分写在多行上，这样就可以使Pascal程忻翔富样优美，便于阅读,但一行不可达到257耕。Pascal缺点?网络支持?面螱UI第二讲Pascal程泄Pascal程杏programex(input,output);usescrtlabel1;constpi=3.1415926;typeint:0..1000;varr:int;s:real;functionfac(r:int):real;vars:real;begins:=r*pi*r;fac:=s;end;proceduresum;begins:=fac(r);end;begin1:ClrScr;write(‘r=‘);readln(r);sum;writeln(‘s=‘,s);readln;goto1;end.第三讲Pascal基本符号、保镣标识符基本符号?ABCDEFGHIJKLMNOPQRSTUVWXYZ?abcdefghijklmnopqrstuvwxyz?0123456789?+-*/=<>><<=>=()[]{}:=.,:;‘..^保留字?(1)程携数、过程符号:program,function,procedure?(2)说弥专用定义符号:array,const,file,label,of,packed,record,set,type,var?(3)短语专用符号:case,do,downto,else,for,forward,goto,if,repeat,then,tountil,while,with?(4)运算符号:and,div,in,mod,not,or?(5)分概:begin,end?(6)空指针常量:nil?共36覆钩泮unitimplementationinterfacestring……标识符?要潜曜急晔斗?自定义标识符规定?以字母划线开头的数字字母下划线?例：a、ab、a1、max、_12、_ab211、a_1、a_等自定义标识符使用时的留意要点?不能与保连名?即使与标准标志符同名，强行改变标准标志符原先意义?最好有一定含义，使程行可读性?可以使用储小写、创混用，意义不变第四讲Pascal标准数据类别、常量与变量常用数据类别??????整型（整数类型）实型（实数类型）字符型布尔类型枚举类型子界类型??????数组类型集合类别记录类型文件种类指针类型对贤常量????定义以很改变值的如：constst=‘abc’句型：const自定义标识符=值函数????定义以涸改变值的如：vari:integer;句型：var自定义标识符:数据类别第五讲Pascal标准变量、过程、运算符与表达式函数与过程?子程泄procedure?函数function运算符运算符+，-，*算抒/div,mod=,<><,>关系运算<=,>=in逻辑运算集合运算赋值运算not,and,or,xor+,-,*:=标准类别，枚举型，子界型，集合顺型、集合布尔集合除文件类型以外庚据类型布尔集合除文件类型以外庚据类型操奏型整型煌整型煌整型除文件类型以外庚据类型标准类别，枚举型，子界型布尔结果类型整型煌实型整型表达式?表达式指由常量、变量、函数、括号、集合及运算符连接颇式子。

表达式中的函数必需要有一阜的值，单福量、变量、函数都可以看成是一革式?运算先簄ot?*,/,div,mod,and?+,-,or?关系运算符、in句型?:=?变量名/函数名:=表达式例题?例2.5.1?两割为100布尔表达式：1:abs(a–b)=100;2:(a+100=b)or(a–100=b)例题?例2.5.2?能否被3和5整除布尔表达式：1:(amod3=0)and(amod5=0)2:amod(3*5)=0例题?例2.5.3?软达式：(yearmod400=0)or(yearmod4=0)and(yearmod100<>0)例题?例2.5.4?擒长语句：1:s=3.14*r*r;2:s=3.14*sqr(r);第三章程衅初步Ŀ¼????????第一讲第二讲第三讲第四讲第五讲第六讲第七讲第八讲读入语句与输充复合语句if语句及if子句的嵌套case语句for循环while循环与repeat循环goto语句小方法第一讲读入语句与输充读入语句?语法：?read(…)?readln(…)?技巧：?读入回车簉eadln;end。

输充?语法：?write(…)?writeln(…)?小技巧:?场宽例题?例3.1.3：读入两竿，交换韩确到0.01。programp3_1_3_1(input,output);vara,b,c:real;beginreadln(a,b);c:=a;a:=b;b:=c;writeln(a:0:2,b:0:2);readln;end.例题?例3.1.3：读入两竿，交换韩确到0.01。programp3_1_3_2(input,output);vara,b:real;beginreadln(a,b);a:=a+b;b:=a–b;a:=a–b;writeln(a:0:2,b:0:2);readln;end.例题?读入一庚，将其平方亥原数的绝对值，最旱的平方根，输车，保笼。programp3_1_4(input,output);varn:integer;beginreadln(n);writeln(sqrt(n*n-abs(n)):0:0);readln;end.第二讲复合句子词汇?复合词组begin…………end;?end前句子末尾可不加’;’第三讲if子句及if语句的嵌套语法?if+(boolean表达式)+then+句子?if+(boolean表达式)+then+句子1+else+句子2?注意：else前句子末尾不加“；”例题?例3.3.1：将两庚磁入max，小的放入min，并输硃rogramp3_3_1(input,output);varmax,min,t:integer;beginreadln(max,min);ifmax<minthenbegint:=max;max:=min;min:=t;end;writeln(max,min);readln;end.例题?例3.3.2:计算以下变量programp3_3_2(input,output);varx,y:integer;beginreadln(x);ifx<0theny=-1elseifx=0theny=0elsey=1;writeln(y);readln;end.1x>0y=0x=0-1x<0例题?例3.3.3：读入三概衞gramp3_3_3(input,output);vara,b,c:integer;beginreadln(a,b,c);ifa>bthenifb>cthenwriteln(a,’’,b,’’,c)elseifa>cthenwriteln(a,’’,c,’elsewriteln(c,’’,a,’elseifc>bthenwriteln(c,’’,b,’’,a)elseifa>cthenwriteln(b,’’,a,’elsewriteln(b,’’,c,’readln;end.’,b)’,b)’,c)’,a);第四讲case语句语法?case语句case表达式of常数表1：语句1；常数表2：语句2；……常数表n：语句n；else语句n+1end；?end前句子末尾可不加’;’，end与case相对，而非begin?else前可加’;’例题?例3.4.1：随机产生两脯读入一概，并运算。

programp3_4_1(input,output);vara,b:integer;ch:char;beginrandomize;a:=random(100);b:=random(100);readln(ch);casechof‘+’:writeln(a,’+’,b,’=’,a+b);‘-’:writeln(a,’-’,b,’=’,a-b);‘*’:writeln(a,’*’,b,’=’,a*b);‘/’:writeln(a,’/’,b,’=’,a/b);end;readln;end.第五讲for循环语法?for变量:=表达式to表达式do语句?for变量:=表达式downto表达式do语句????要莟o循环?lt;=终值downto循环?gt;=终值变量：顺型例题?例3.5.1:输车?00所有的整数。programp3_5_1(input,output);vari:integer;beginfori:=1to100dowriteln(i);readln;end.例题?例3.5.2:倒械?00所有的偶数。

programp3_5_2(input,output);vari:integer;beginfori:=1downto100doifimod2=0thenwriteln(i);readln;end.例题?例3.5.3:警察查一杆犯。A说，是B杀的；B说：不是我；C说：是A杀的。已知有且唯有一傅了谎，问是人谁杀的。programp3_5_3(input,output);vara,b,c:boolean;beginfora:=falsetotruedoforb:=falsetotruedoforc:=falsetotruedoiford(a)+ord(b)+ord(c)=2theniford(not(b))+ord(b)+ord(not(a))=2thenifnot(a)thenwriteln('a')elseifnot(b)thenwriteln('b')elsewriteln('c');readln();end.注意事项?例3.5.4?例3.5.5?for循环的终值不能变化。

本文来自电脑杂谈，转载请注明本文网址：
http://www.pc-fly.com/a/jisuanjixue/article-134606-1.html