Pascal语言基础知识一.ppt

第一讲Pascal语言基础一 信息学奥赛的内容 程序 计算机语言 数据结构 算法 FreePascal 信息学奥林匹克竞赛属于智力与应用计算机解题能力的比赛 题目有相当的难度 解好这类题目 需要具备很强的综合能力 1 观察和分析问题的能力 2 将实际问题转化为数学模型的能力 3 灵活地运用各种算法的能力 4 熟练编写程序并将其调试通过的能力 5 根据题目的要求 自己设计测试数据 检查自己的解法是否正确 是否完备的能力 能够参加信息学竞赛的选手应该具有很强的自学能力 需要学习有关组合数学 图论 基本算法 数据结构 人工智能搜索算法及数学建模等知识 还要学会高级语言和编程技巧 要具备很强的上机操作能力 考察的能力 选手应具备的条件 前提 综合成绩突出1 扎实的数学基础 2 很强的自学能力 3 与同学之间的密切友好的合作与交流 4 持之以恒 坚持不懈的学习 5 耐得住枯燥与寂寞 6 不能以参加竞赛为理由而耽误了其他文化课的学习 7 坚决抵制玩游戏 上网聊天 例1 要将一张100元的大钞票 换成等值的10元 5元 2元 1元一张的小钞票 每次换成40张小钞票 每种至少1张 如 有一种换法 10元 1张5元 5张2元 31张1元 3张问 一共有多少种换法 问题举例 例2 n个客人围着一个桌子吃饭 每一个人都至少认识其他的2个客人 请设计程序求得n个人的一种坐法 使得每个人都认识他左右的客人 例3 问题描述有N个硬币正面朝上排成一排 N 6 每次将5个硬币翻过来放在原位置 直到最后全部硬币翻成反面朝上为止 编程找出最少翻硬币的次数数 输入只有一个整数N 1015 输出翻硬币的最少次数样例 输入 8输出 4 程序的基本结构 程序的上机调试和运行 语言基础一 例1 要将一张100元的大钞票 换成等值的10元 5元 2元 1元一张的小钞票 每次换成40张小钞票 每种至少1张 如 有一种换法 10元 9张5元 1张2元 2张1元 1张问 一共有多少种换法 程序的上机调试和运行 programex1 varx1 x2 x3 x4 n integer beginn 0 forx1 1to10doforx2 1to20doforx3 1to50doforx4 1to100doif 10 x1 5 x2 2 x3 x4 100 and x1 x2 x3 x4 40 thenn n 1 writeln n end 例2 已知 s 1 1 2 1 3 1 n求 使s的值大于10时最小的n vars real n integer begins 0 n 0 whiles 10dobeginn n 1 s s 1 n end writeln n end 例3 编一个程序 从键盘输入一个真分数的分子和分母 输出它的小数形式 精确到小数点后1000位 varn m r q i integer beginread n m r n write 0 i 1 whilei 1000dobeginq 10 rdivm r 10 rmodm write q i i 1 end end 上机调试运行步骤 1 运行 FreePascal2 file new 新建文件3 compile make 编译 找错误 4 run run 运行5 debug output 察看结果 program程序名 可以省略 var变量说明 begin语句 语句 语句 end Pascal程序的基本结构 程序的基本结构 一 变量的定义说明 二 Pascal数据类型 整型 实型 三 基本语句 赋值语句 输入语句read 输出语句write 四 算术运算符和算术表达式五 标准函数 数值型函数 语言基础一 一 变量的定义说明 在程序中用到的所有变量必须事先定义 格式 Var 如 输入3个整数 求这3个数的平均值 Vara b c integer aver real 说明 1 同一类型的变量可以放在一起 也可分开写 不同类型的不能放在一起 2 变量名 可以是一个字母 也可以是多个字母和数字的组合 但字母开头 3 不能重复定义变量 二 Pascal数据类型 整型 实型 字符型和布尔型 1 整型 类型数值范围占字节数Byte0 2551Word0 655352Shortint 128 1271Integer 32768 32767 2Longint 2147483648 21474836474Longword0 42949672954Int64 9223372036854775808 92233720368547758078QWord0 184467440737095516158 2 实数类型范围有效位数占用字节Real2 9e 39 1 7e3811 126Single1 5E 45 3 4E387 84Double5 0E 324 1 7E30815 168Extended1 9E 4951 1 1E493219 2010Comp 2E64 1 2E63 119 208 Varbeginread a b c a b d a b writeln c writeln d End 例 输入 两个整数a b 3000 输出它们的乘积c 商d 实数的定点型格式输出 实数表达式 域宽 小数位数T 63 123write t 6 312300000000E 01write t 6 2 63 12write t 6 5 63 12300如果要求小数点后精确2位小数 Writeln x 0 2 a b integer C longint d real 1 赋值语句赋值语句是最简单的语句 1 赋值语句的格式变量名 表达式 其中 称为赋值号 2 执行过程计算机先计算赋值号右边表达式的值 然后将表达式的值赋给变量名代表的变量 如 A 9 8 2 1 A A 1 三 基本语句 输入语句read和readln功能 从键盘读入数据项 并把它存到变量中去 使该数据能在以后的计算中使用 输入语句的一般形式为 read v1 v2 vn readln v1 v2 vn 从键盘逐次读入数据 分别赋给变量v1 v2 vn 一行输入多个变量值时 要求数据之间用空格分隔 readln语句要求输入数据后必须回车 使得后继操作从下一行的头上开始 read语句与readln语句区别是 1 read语句是一个接一个地读数据 在执行完本Read语句 读完本语句中变量所需的数据 后 下一个读语句接着从该数据输入行中继续读数据 也就是说 不换行 如 Read a b Read c d Read e 如果输入数据行如下 1 2 3 4 5 6 则a b c d e的值分别为1 2 3 4 5 如果后面无读语句则数据6是多余的 这是允许的 Readln则不同 在读完本Readln语句中变量所需的数据后 该数据行中剩余的数据多余无用 或者说 在读完本Readln语句中变量所需数据后 一定要读到一个回车 否则多余的数据无用 设有下列语句 read a b c readln d e readln readln f g 其中 所有变量均为整型 设输入的数据如下 1 2 3 4 5 6 7 8 9 10 11 12 13 Vara b c d e f g integer beginread a b c readln d e readln readln f g writeln a b c d e f g end 2 readln语句与read语句的第二个区别是 read后一定要有参数表 readln可以不带参数表 即可以没有任何输入项 只是等待读入一个换行符 回车 经常用于暂停程序的运行 直到输入一个回车 输出语句write和writeln功能 把程序计算的结果 按适当的形式输出到屏幕 1 write语句格式Write 表达式1 表达式2 如 write x 5 a b write MynameisLiping 2 writeln语句格式 Write 表达式1 表达式2 或writeln Write语句与writeln语句格式上都相似 但它们在功能上有所不同 两个语句的区别在于 write语句将其后括号中的表达式一个接一个输出后 没有换行 而writeln语句则在输出各个表达式的值后换行 例如以下两个程序段的输出分别为 write 1 2 3 4 write 5 6 输出为 123456writeln 1 2 3 4 write 5 6 输出为 123456 实数的输出格式实数 real 以浮点型格式输出 例如805 67对应的浮点数为8 056700000000E 02 这种实数表达方式很不方便 我们可以通过下述形式强迫实数以定点型格式输出 实数表达式 域宽 小数位数例如 t的值设为63 123 下面三条输出语句分别有它们右边所示的输出格式 write t 6 312300000000E 01write t 6 2 63 12write t 6 5 63 12300write t 0 0 vara b t integer beginread a b t a a b b t writeln a a b b end 例 输入两个整数a b 交换他们的值 并输出 如 输入 3034输出 3430 四 算术运算符和算术表达式 1 算术运算符运算符运算运算对象结果类型 加整型 实型只要有一个运算对象是实型 结果就 减整型 实型是实型 如果全部的运算对象都是整 乘整型 实型型并且运算不是除法 则结果为整型 除整型 实型若运算是除法 则结果是实型 div整除整型整型mod取余整型整型 2 表达式是通过运算符把常量 变量 函数调用结合起来组成的 3 x1 b 上机练习题目 输入一个3位的正整数 输出他们的各位数字之和与乘积 如 输入 436输出 1372 五 标准函数 a b 算术函数函数标识符自变量类型意义结果类型abs整型 实型绝对值同自变量sqrt整型 实型平方根实型int整型 实型整数部分实型exp整型 实型指数实型ln整型 实型自然对数实型sqr整型 实型平方同自变量cos整型 实型余弦实型sin整型 实型正弦实型arctan整型 实型反正切实型frac整型 实型小数部分实型 abs 4 4abs 7 49 7 49int 3 71 3 0sqrt 4 2 正确的书写表达式 1 2 xy3 2 上机练习1 输入三角形的三条边a b c 输出三角形的面积 a b c是正整数 100 满足三角形条件