任务:
已有一个文本数据文件(全部是数字,每个数字一行,共20行)
要求把文本数据输入到PASCAL(不用键盘输入),然后在屏幕上输出.
我写的代码:
program text;
var f:text;
n:real;
begin
assign(f,'c:\aa.txt');
reset(f);
while not eof(f) do begin
read(f,n);
writeln(n);
end;
close(f);
end.
有什么错误吗?为什么我不能全部把数据都输入进去,pascal只输入了第一个数据.
烦哦,我研究了很久,都不得.
谢谢了!!!
