2022年Pascal语言输入语句、输出语句的应用[参 .pdf

《2022年Pascal语言输入语句、输出语句的应用[参 .pdf》由会员分享，可在线阅读，更多相关《2022年Pascal语言输入语句、输出语句的应用[参 .pdf（3页珍藏版）》请在淘文阁 - 分享文档赚钱的网站上搜索。

1、PASCAL 学案1 &3、Pascal语言输入语句、输出语句的应用。【知识目标】1、理解和掌握PASCAL 语言中输入语句用法及格式。2、理解和掌握PASCAL 语言中输出语句用法及格式。 。3、简单程序的编写及典型实例。一、 【引课】：在编程中最重要的是能实现人机交互, 即程序所需的数据输入和运算结果的输出方面上。我们在前面的实例中已经接触到这类的操作。现在我们将系统的学习它。【读语句】：通过计算机的外部设备将数据输入到计算机内存，供程序使用，要用到输入语句。 PASCAL 中的输入功能是由读语句（read 和 readln ）来完成的。例 1 输出两个自然数相除的商和余数。解:设被除数、

2、除数、商和余数，分别为A，B，C，D，均为变量，且都是整数类型。题中未给出具体的自然数A、B，可采用键盘输入方式。 给出提示，从键盘输入a, b； 显示两数相除的数学形式； 求出 a 除以 b 的商 c； 求出 a 除以 b 的余数 d； 紧接等式后面输出显示商和余数。Pascal程序 : Program Ex14；Var a,b,c,d : integer；Begin Write(INPUT A ，B：)；给出提示信息Readln(a，b)；输入 a，bWriteln ；输出一空行Write(a，/，b，=)；输出等式之后不换行c:=a div b；整除运算，取商的整数部分d:=a mod

3、b；相除求余运算，取商的余数部分Writeln(C ，,，d)；输出后自动换行 Readln 等待输入回车键 End. 执行本程序中第一个Write 语句，输出其引号以内的一串提示信息，是给紧接着的输入语句提供明确的提示(要求 )，有“一目了然，人机对话”之效果。Readln 是一个特殊的输入语句，要求输入一个回车(换行 )才能往下执行。Readln 是输入语句，它的一般格式为: Read (变量 1，变量 2)； Readln (变量 1，变量 2)； Readln 前两种格式均要从键盘给变量输入数据，输入时，所键入的数据之间以空格为分隔，以回车名师资料总结 - - -精品资料欢迎下载 -

4、- - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 1 页，共 3 页 - - - - - - - - - PASCAL 学案2 为输入结束。若多输入了数据(即数据个数超过变量个数)，Read 语句读完数据之后，能让后续的读语句接着读取多下来的数据；而Readln 语句对本行多输入的数据不能让后续语句接着读取多下来的数据。 为了防止多输入的数据影响下一个输入语句读取数据，建议尽量使用Readln 语句输入数据。第三种格式不需输入数据，只需按入一个回车键。【写语句】要将程序运算的结果打印出来或保存起来，就需要用到输出语句。PASCAL

5、 中的输出功能是由写语句实现的。它的作用是将计算机内存中的数据输出到计算机的输出设备上（默认为显示器）或其他外部设备上。注意设计输出时，要考虑以下几个问题：1、输出哪些数据。2、输出到什么地方。3、用什么格式输出。例 2编程计算半径为R的圆的面积和周长。解：这是一个简单问题，按数学方法可分以下几步进行处理： 从键盘输入半径的值R； 要求告诉圆的半径R 用公式 S= R2 计算圆面积； 用公式 C=2 R 计算圆周长； 输出计算结果。Pascal 程序: Program Ex13； 程序首部 Var R，S，C: Real ； 说明部分 Begin 语句部分 Write (R=?)； Readl

6、n(R)； 输入半径 S:=Pi*R*R；圆面积公式 S=R2 C:=2*Pi*R；圆周长公式 C=2 R Writeln(S=，S)； 输出结果 Writeln(C=，C)； Readln 等待输入回车键 End. Writeln是输出语句，输出语句有三种格式: Write (输出项 1，输出项 2) ；执行输出后光标不换行 Writeln (输出项 1，输出项 2) ； 执行输出后光标换到下一行 Writeln 仅输出空白且光标换到下一行Writeln语句后面的圆括号以内部分均为输出项，可以是多项，各项间用逗号分隔；对单引号里的内容按照引号内的原样(字符 ) 输出显示。如果输出项是表达式，

7、则只输出表达式的值，而不是表达式本身。输出语句的格式Pascal语言把输出项的数据显示占用的宽度称为域宽，你可以根据输出格式的要求在输出语句中自动定义每个输出项的宽度。定义宽度时分为单域宽和双域宽。（1）单域宽输出格式：writeln(I：n) 名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 2 页，共 3 页 - - - - - - - - - PASCAL 学案3 在 n 个字符宽的输出域上按右对齐方式输出I 的值，若 n 大于 I 的实际位数，则在I 值前面补 (n-I的实际位

8、数）个空格。若I 的实际位数大于n，则自动突破限制。 n 必须是整数。（2）双域宽输出格式：writeln(a：n：m) 双域宽主要用于实型数据的输出。n 的用法同上。在n 个字符宽的输出域上按右队齐方式用小数点形式输出a 的数值， m是小数点后的位数。原来的数据按该该格式指定的小数位数四舍五入。若m=0 ，则不输出小数部分和小数点，原数据四舍五入取整。n，m必须是整数。如果双场宽不能满足输出数据的最低要求，也自动突破指定的场宽限制。即在保证小数点后面有效的情况下，进行实际输出。例：输出语句的例子program shuchu; const s=pascal; var i:integer; r:

9、real; c:char; b:boolean; begin i:=12345; r:=123.45 c:=a; b:=true; writeln(i=); writeln(i:6); writeln(r=,r,r:6:1); writeln(c=,c,c:10); writeln(b=,b,b:10) end. 作业习题1、交换两个变量的值：由键盘输入两个正整数A和 B，编程交换这两个变量的值。2、已知 ABC中的三边长（这三边可以构成一个三角形），数据由键盘输入，输出ABC的面积。 ( 计算公式 : S= )(*)(*)(*cpbpapp。 其中 P = 2cba) 3、某仓库 5 月 1 日有粮食 100 吨，5月 2 日又调进 20 吨，5 月 3 日卖出库存的三分之二，5 月 4 日又调进库存的3 倍粮食，问该仓库从5 月 1 日到 5 月 4 日期间每天的粮食分别是多少吨？ (输出每天的库存量 )。名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 3 页，共 3 页 - - - - - - - - -