很简单的问题 不太明白,是这个意思吗?var a:array [0..9] of string;begin... a[0] := 元素1 a[1]... end; 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 const NumArray:array[0..9] of integer=(0,1,2,3,4,5,6,7,8,9); const NumArray:array[0..9] of integer;i:integer;while i<10 do numarray[i]:=10-i; const NumArray:array[0..9] of integer=(10,9,8,7,6,5,4,3,2,1); const NumArray:array[0..9] of integer;i:integer;begin i:=0; while i<10 do begin numarray[i]:=10-i; end;end; const NumArray:array[0..9] of integer;i:integer;begin i:=0; while i<10 do begin numarray[i]:=10-i; inc(i); end;end; 买书(二手的,新的想转让的也行,TCP/IP详解 卷?) 开了个计算机技术二手书店,心情好,散分。 程序出错,未找到原因,请教大家! 用DELPHI 如何存取 ORACLE 数据库中的字段类型为 BLOB 的二进制图象数据???? ntfs2请进 怎样写软件的测试报告?能否给一个范例! forgot的散分帖:请教大家一个感情问题——我跟她有可能发展下去吗? delplhi6得程序发布? 能谈谈你的心得吗? 在Delphi 中能凭空建立数据库么? 我应当怎么取到存储过程的返回值????在线等候 chr()函数为什么不能将汉字的内码转换为汉字?
NumArray:array[0..9] of integer=(0,1,2,3,4,5,6,7,8,9);
NumArray:array[0..9] of integer;
i:integer;
while i<10 do
numarray[i]:=10-i;
NumArray:array[0..9] of integer=(10,9,8,7,6,5,4,3,2,1);
NumArray:array[0..9] of integer;
i:integer;
begin
i:=0;
while i<10 do
begin
numarray[i]:=10-i;
end;
end;
NumArray:array[0..9] of integer;
i:integer;
begin
i:=0;
while i<10 do
begin
numarray[i]:=10-i;
inc(i);
end;
end;