财务软件版1楼: s1 = array[0..0] of SmallInt 这是个什么数组来的，元素是0吗？

2楼: 数组只有一个元素
如：声明了S1的变量
var
ary:S1;
ary只有元素ary[0]. 如免费进销存系统

3楼: 这是只有一个数据的数组 操作如：s1[0] := 1; A := S1[0];

4楼: 数组范围从0到0，类型是SmallInt，值未定

5楼: procedure TForm1.Button1Click(Sender: TObject);
var
s1 : array[0..0] of SmallInt;
L,H:Integer;
begin
L:=Low(S1); // 這是取數組的低位
H:=High(S1); // 這是取數組的高位
ShowMessage(IntToStr(L)+＇＇ / ＇＇+IntToStr(H));
end;

6楼: 就有一个SmallInt，为0

财务软件版7楼: SmallInt数组，值未定

8楼: 值未定；

9楼: 数组下标是0