输入输出语句

输入输出语句

ID:39460044

大小:41.00 KB

页数:7页

时间:2019-07-03

输入输出语句_第1页
输入输出语句_第2页
输入输出语句_第3页
输入输出语句_第4页
输入输出语句_第5页
资源描述:

《输入输出语句》由会员上传分享,免费在线阅读,更多相关内容在工程资料-天天文库

1、输入输出语句一、输入语句例1.1设一铁管长L=2300厘米,内外径R1和R2分别为2厘米和2.2厘米,要求计算出它的质量(密度d为7.8克/立方厘米)。根据我们学过的知识,可以写出以下程序:programex1(input,output);varL,R1,R2,m,d:real;BeginL:=2300.0;R1:=2.0;R2:=2.2;D:=7.8;{以上为变量赋初值}M:=3.1416*sqr(R2-R1)*d*L;{根据公式求出铁管的质量m}End.在数学中,通过以上程序可以求出铁管的质量;但是当你在PASCAL中运行时,如果你想换一下变量的值进行运算,那你该怎

2、么办呢?在程序中变量获得一个确定的值,固然可以用赋值语句,但是如果需要赋值的变量较多,或变量的值经常变化,则使用输入语句,将更为方便。读语句是在程序运行时由用户给变量提供数据的一种很灵活的输入动作,它有两种格式:read(x1,x2,x3,…,xn)readln(x1,x2,x3,…,xn)其中变量名表是用逗号隔开的若干个变量名组成的。功能:从标准输入文件(即INPUT,一般对应着键盘)中读入数据,并依次赋给相应的变量说明:(1)read和readln是标准过程名,它们是标准标识符(2)执行到read或readln语句时,系统处于等待状态,等待用户从键盘上输入数据,系统

3、根据变量的数据类型的语法要求判断输入的字符是否合法。如执行read(a)语句,a是整型变量,则输入的字符为数字字符时是合法的,当输入结束时,则自动将刚接受的一串数字字符转换为整数赋给变量a(3)在输入数值型(整型或实型)数据时,数据间要用空格或回车分隔开各个数据,输入足够个数的数据,否则仍要继续等待输入,但最后一定要有回车,表示该输入行结束,直到数据足够,该读语句执行结束,程序继续运行判断正误:readln(a、b、c、d);readln(a+b,c);例1.2用read语句改写上面的程序programex2(input,output);varL,R1,R2,d,m:r

4、eal;BeginRead(L,R1,R2,d);M:=3.1416*sqr(r1-r2)*d*l;End.当程序运行至read语句时,程序就停下来,等待用户通过键盘输入数据:2300.02.02.27.8←┘{符号←┘表示回车}注意:(1)变量名必须在程序的说明部分预先说明,才可以使用。(2)变量的数据类型必须与输入的数据类型相同。(3)输入的数据的顺序必须与变量的顺序相同,否则会出错。(4)要注意输入数据的个数与变量个数的关系。read语句与readln语句的区别:(1)read语句是一个接一个地读数据,在执行完本Read语句(读完本语句中变量所需的数据)后,下一个

5、读语句接着从该数据输入行中继续读数据,也就是说,不换行。如:Read(a,b);Read(c,d);Read(e);如果输入数据行如下:123456←┘则a,b,c,d,e的值分别为1,2,3,4,5,如果后面无读语句则数据6是多余的,这是允许的。Readln则不同,在读完本Readln语句中变量所需的数据后,该数据行中剩余的数据多余无用,或者说,在读完本Readln语句中变量所需数据后,一定要读到一个回车,否则多余的数据无用(2)read后一定要有参数表,而readln可以不带参数表,即可以没有任何输入项,只是等待读入一个换行符(回车),经常用于暂停程序的运行,直到输

6、入一个回车二、输出语句输出语句的作用是将程序运算的结果输出到屏幕或打印机等输出设备,这里通常是指输出到屏幕。(一)输出语句的两种格式1、write语句格式:Write(表达式1,表达式2,……);如:write(1,2,3,4);write(1.2,3.4,5);write('MynameisLiping');2、writeln语句格式:Writeln(表达式1,表达式2,……)或writeln(二)输出语句的功能计算机执行到某一输出语句时,先计算出输出语句中的每个表达式的值,并将每一个表达式的值一个接一个地输出到屏幕上。Write语句与writeln语句格式上都相似,

7、但它们在功能上有所不同,两个语句的区别为:(1)WRITE连续输出;而WRITELN输出完后会自动换行;(2)WRITE至少有1个输出项;而WRITELN可以无,表示换一行;WRITE(X,Y)等价于WRITE(X);WRITE(Y);WRITELN(X,Y)等价于WRITE(X);WRITELN(Y);;例2.1:写出结果consta:=10;b:=20:begin writeln(50);writeln(a);writeln(a+b);writeln('a+b=',a+B);End.例2.2:write(1,2,3,4);write(

当前文档最多预览五页,下载文档查看全文

此文档下载收益归作者所有

当前文档最多预览五页,下载文档查看全文
温馨提示:
1. 部分包含数学公式或PPT动画的文件,查看预览时可能会显示错乱或异常,文件下载后无此问题,请放心下载。
2. 本文档由用户上传,版权归属用户,天天文库负责整理代发布。如果您对本文档版权有争议请及时联系客服。
3. 下载前请仔细阅读文档内容,确认文档内容符合您的需求后进行下载,若出现内容与标题不符可向本站投诉处理。
4. 下载文档时可能由于网络波动等原因无法下载或下载错误,付费完成后未能成功下载的用户请联系客服处理。