一维数组赋值 ( 积分: 10 )

lgg30 · 2005-05-22

在Pascal中声明一个一维数组变量data
var data:array[1..10] of integer
如何把12　56　8　41　22　98　77　33　65　88直接赋值给它？

lgg30 · 2005-05-22

在Pascal中声明一个一维数组变量data
var data:array[1..10] of integer
如何把12　56　8　41　22　98　77　33　65　88直接赋值给它？

dawnsong · 2005-05-22

data :=(12,　56　,8　,41　,22　,98　,77　,33　,65　,88);

lgg30 · 2005-05-22

不行，我试过了

daWolf · 2005-05-22

this?
data[1] := 12;
data[2] := 56;
....

ChaseSun · 2005-05-22

var
str : String;
begin
str := '12560841229877336588';
for I := 1 to 10 do
data = StrToInt(copy(str, I+1, 2));
end;

ChaseSun · 2005-05-22

最直接的方式应是使用指针。

lgg30 · 2005-05-22

to ChaseSun:
能不能帮我直接用指针的程序写出来？谢谢！

dawnsong · 2005-05-23

哦，还真的不行，不过常量数组是可以这么赋值的

dawnsong · 2005-05-23

http://www.delphibbs.com/delphibbs/dispq.asp?lid=778224
看这个

dawnsong · 2005-05-23

var x:array[1..2] of Integer=(1,2);
全局变量还是可以这么申明的，
看这个http://www.delphibbs.com/delphibbs/dispq.asp?lid=2244412

lgg30 · 2005-05-24

接受答案了.