预览加载中,请您耐心等待几秒...
1/10
2/10
3/10
4/10
5/10
6/10
7/10
8/10
9/10
10/10

亲,该文档总共26页,到这已经超出免费预览范围,如果喜欢就直接下载吧~

如果您无法下载资料,请参考说明:

1、部分资料下载需要金币,请确保您的账户上有足够的金币

2、已购买过的文档,再次下载不重复扣费

3、资料包下载后请先用软件解压,在使用对应软件打开

第一章:计算机与程序设计简介一、计算机的三大功能计算功能;记忆功能;判断功能。二、计算机的发展世界上第一台计算机,1946年,美国,ENIAC三、计算机的组成结构由硬件和软件两部分组成。硬件结构的五个部分:输入设备:键盘、鼠标。输出设备:显示器、打印机。CPU中央处理器运算器控制器存储器:内存、外存四、计算机的语言低级语言机器语言:(0、1、代码)汇编语言:(符号指令)高级语言:(英文指令)(Pascal语言)五、Pascal程序的基本结构:例:小明每月存5元。问:四年他共存了多少元?首部——PROGRAMEX;说明部分——VARA,B:INTEGER;执BEGIN行A:=5;部B:=A*12*4;分WRITELN(B);END.六、键盘指法:七、上机操作:1、开机:显示器、主机2、进入:TP环境(蓝白)①在Windows界面上,双击MSDOS图标②打TP3、输入程序4、执行程序:按CTRL+F95、看结果(切换到输出屏幕(黑白))按ALT+F56、新开一页(窗口)按ALT+F选NEW命令7、切换当前工作页面(窗口)按ALT+页号8、关闭当前窗口按ALT+F39、退出TP环境按ALT+E打X(选EXIT命令)10、回Windows界面打EXIT11、关机点击开始→关闭系统→关机→Y关显示器上机程序:求自己两科的平均成绩PROGRAMEX2;VARX,Y,S,P:INTEGER;BEGINX:=;Y:=;S:=X+Y;P:=SDIV2;WRITELN(‘P=’,P);END.第二章顺序结构设计编程的“三步曲”:输入——处理——输出一、赋值语句(一)它能给变量一个数据如:A:=5;其中“:=”是赋值号1、变量——是可存放各种不同数据的“小盒子”(存储单元),在程序执行中,可改变它的值。2、变量命名规则①必须以字母开头,是字母、数字的组合如:Box√DA√A12√5A×A+B×②Pascal系统的“关键字”不能用如:BeginEnd练习:命名:长——宽——平均——最大——最小——例句:A:=3;B:=-1;A:=5;重新赋值,则原值被冲掉B:=A;把A给B,A不变,B与A同值Pascal规定:变量在用之前,必须说明它的类型。3、四种简单标准类型:整数类型:INTEGER–32768~32767(MAXINT)(有序)用于:人数,物品个数……②实数类型:REAL即:带有小数的娄(无序)用于:金额、高度、重量……实数有两种表示法:十进制如:123.45科学记数法:如:1234567890000→1.2345678900E+120.000012345→1.2345000000E-5③字符类型:CHAR(有序)如:’A’、’B’、’6’、’2’序号范围:0~255用于:文本信息处理④布尔类型:(有序)BOOLEAN只有2个值:TRUE(真)FALSE(假)序号:FALSE——0TRUE——1如:3<5为TRUE3>5为FALSE用于:判断4、变量说明的格式:VAR变量表:类型;如:VARR:INTEGER;P:REAL;B:BOOLEAN;W:CHAR;BEGINR:=22;P:=86.5;B:=(P>80);W:=’N’;B:=FALSE;END.练习:改正下列语句中的错误VARA,B:INTEGERS:REAL;BEGINA:=10:B:=A*12*3;S:=1.40;END.(二)赋值语句有计算功能如:B:=A*12*4;表达式——用计算机的运算符、圆括号连接数和变量的算式。(A+B)÷2→(A+B)/2→(A-3)/(5*B)[(A+1)×B+1]×B→((A+1)*B+1)*B→1/A+1/BPascal运算符:+、-、*、/整除:DIV求余:MOD练习:定义四种变量,写8个赋值语句(三)赋值语句的格式变量:=表达式;功能:将表达式的值赋给“:=”左边的变量。(四)应用举例例一:给A、B、C赋值1万。①直接赋值A:=10000;B:=10000;C:=10000;②辗转赋值A:=10000;B:=A;C:=B;例二:累加与计数①累加②计数A:=0;A:=0;A:=A+5;A:=A+1;A:=A+10;A:=A+1;A:=A+30;A:=A+1;……例三:求A、B、C三科的平均成绩。已知:A——98,B——100,C——97PROGRAMEX1;VARA,B,C:INTEGER;P:REAL;BEGINA:=98;B:=100;C:=97;P:=(A+B+C)/3;WRITELN(P:0:2);END.例四:把55给A,把16给B,然后交换A与B的值:用“冒泡法”PROGRAMEX2;VARA,B,C:INTEGER;BEGINA:=55;B:=16;C:=A;A:=B;B:=C;WRITELN(A,