主题:关于文件读入问题
popoa
[专家分:100] 发布于 2006-10-06 21:38:00
假设文件中有1001010这七个数,现要一个一个存入数组中,如何?
回复列表 (共2个回复)
沙发
lgr7000 [专家分:230] 发布于 2006-10-07 16:45:00
以字符串形式读入,再用val分别转化成数字存入数组中
var
s:string;
n:array[1..7] of integer;
i:integer;
begin
...
readln(file,s);
for i:=1 to 7 do
val(s[i],n[i]);
end.
板凳
bigchen [专家分:1940] 发布于 2006-10-22 15:17:00
用longint型读入,然后再分解,就OK了!
我来回复