free pascal中read和readln的区别

来源:百度知道 编辑:UC知道 时间:2024/06/13 04:24:53

read是读入所有字符(如果读入数字自动忽略空格和回车)
readln是只读入当前行的(如果当前行的输入不够则继续读入,超过了就忽略后面的.
你可以试试下面两个程序,运行后都直接回车..
var c:char;
begin
read(c);
writeln(ord(c));
end.
---------------------
var c:char;
begin
readln(c);
writeln(ord(c));
end.
=================================================
还有这两个,输入1,2,3,回车4
var a,b,c,d:integer;
begin
read(a,b);
read(c,d);
writeln(a,b,c,d);
end.
--------------------------
//下面这个程序你要只输入1,2,3,回车4是不会停的.
因为readln(a,b)后,3被忽略,然后readln(c,d)是读c和d,可是只有一个4了。。你必须再输入一个值
var a,b,c,d:integer;
begin
readln(a,b);
readln(c,d);
writeln(a,b,c,d);
end.

1 输入语句:
Read ( a, b ) :读入a,b两个变量的值,注意变量类型与输入数据类型要一致
Readln(xp) :读入一行数据
2 计算或赋值语句:
A:=100*C+d :直接计算赋值语句,注意 “:=”的写法,等号前不能丢冒号
3 输出语句:
Write (a, b:5); :输出a,b两个变量的值,其中规定b变量的值占5个字符宽度
Writeln(a); :输出a变量的值,并自动将光标换到下一行
Write(