求助，需要声明1000个变量来储存数据，可我打不完，有简便方法吗

level 2

🍼哆啦A梦🍭 楼主

求助，需要声明1000个变量来储存数据，可我打不完，有简便方法吗，谢谢

2014年06月21日 09点06分 1

level 9

额。。。。。
这个数组不就行了吗。

2014年06月21日 09点06分 2

level 13

var a:array[1..1000] of integer;
a[1] a[2] ...... a[1000]这1000个integer任你折腾

2014年06月21日 09点06分 3

level 12

var i:integer;
begin
write('var');
for i:= 1 to 999 do writeln('a',i,',');
write('a1000');
writeln(':integer;')
end.
运行一下，把输出结果复制下来即可

2014年06月21日 10点06分 4

一行超过255个字符，fp打开失败

2014年06月21日 10点06分

@Fallen_Breath 这就是为什么用writeln('a',i,',');而不是write

2014年06月21日 10点06分

回复 zjfaok :。

2014年06月21日 10点06分

level 2

🍼哆啦A梦🍭 楼主

谢谢，

2014年06月22日 11点06分 5