有两种办法
如果是文件类型可羡侍以用eoln函数(如果下一兄渣吵个字符是行结束符或文件结束符,那么函数值为true,否则是false)判断,
如果一个字符梁春一个字符地读还可以判断输入的字符是不是chr(13)(就是一个回车符号)
while not eoln do
eoln为布尔型,当前光标谈旁雀位置如果不是启谨换行符,就为false,到了换行符就变为含早true
如果是文本文件的话可用while not eoln do
eoln为函数,用于判断文件中的一行是否结束。
如果是类型文件(file文件)的话,要注意类型文件中灶禅败没有行的概念,整个文件就是一行,故不能袭高用隐颤eoln函数。
二、三楼的同志知不知神轮道,while not eoln do 不用文件输入输出也可悄败以用,所以说,我建议你启瞎颤用while not eoln do,当然,他们说的chr(13)也没错。
这敬晌亏样写应亮神该可以:
read(n);
while n<>chr(13) do
begin
...
read(n);
end;
行尾的回车符就是谨唤chr(13),利用这一点。