Arrays คือ ตัวแปรที่มีลักษณะเป็นโครงสร้างของตัวแปรที่มีชนิดเดียวกันทั้งหมด

โดยทั่วไป Array จะสามารถแยกได้เป็น 2 ชนิด คือ Static Array และ Dynamic Array รายละเอียดของแต่ละชนิดสามารถสรุปได้ตามนี้

var
  ArrX1:array[3..10] of real;
  ArrX2:array[1..2,1..3] of integer;
  ArrX3:array[1..2] of array[1..3] of integer;
  
  //static array with initial value
  Arr1:array[1..2] of integer = (10,20);
  Arr2:array[1..2,1..3] of integer = 
             ((10,20,30),(40,50,60));
  Arr3:array[1..2] of array[1..3] of integer = 
             ((10,20,30),(40,50,60));
  

var 
   ArrY1:array of real;
   ArrY2:array of array of real;
    
begin
    setlength(ArrY1,3); //Set array[0..2]
    setlength(ArrY2,3,5); //Set array[0..2,0..4]
end.

สำหรับ Array ทั่วไป การกำหนดค่าสมาชิกของ Array สามารถทำได้ดังตัวอย่างต่อไปนี้

  Var ArrX:array[1..3] of integer; //Static Array - 1D
      ArrY:array[0..1,1..2] of real; //Static Array - 2D
      ArrZ:array of Boolean; //Dynamic Array - 1D
  
  begin
    //Define values of ArrX
    ArrX[1]:=10;
    ArrX[2]:=20;
    ArrX[3]:=30;
    
    //Define values of ArrY
    ArrY[0,1]:=1.20;
    ArrY[1,1]:=2.54;
    ArrY[0,2]:=3.21;
    ArrY[1,2]:=4.31;
    
    //Define values of ArrZ
    setlength(ArrZ,3);
    ArrZ[0]:=True;
    ArrZ[1]:=False;
    ArrZ[2]:=False;
    
    //Print values of all Arrays
    writeln('ArrX[1] = ',ArrX[1]);
    writeln('ArrX[2] = ',ArrX[2]);
    writeln('ArrX[3] = ',ArrX[3]);
    writeln('ArrY[0,1] = ',ArrY[0,1]);
    writeln('ArrY[1,1] = ',ArrY[1,1]);
    writeln('ArrY[0,2] = ',ArrY[0,2]);
    writeln('ArrY[1,2] = ',ArrY[1,2]);
    writeln('ArrZ[0] = ',ArrZ[0]);
    writeln('ArrZ[1] = ',ArrZ[1]);
    writeln('ArrZ[2] = ',ArrZ[2]);
    readln();
  end

การส่งผ่าน Array เป็นตัวแปร สามารถทำได้โดยการประกาศ Array ใน Argument นั้นให้รับค่า Dynamic Array ดังนี้

Type TArrR:array of real; 
    
Procedure ShowItemArray(Arr:array of real);
Procedure ShowItemArray(Arr:TArrR);

หมายเหตุ-index ของ Array ที่ส่งผ่านเข้ามาใน Procedure/Function จะเริ่มจาก 0 เสมอตามรูปแบบของ Dynamic Array

Function เกี่ยวกับ Array ที่เราจะได้ใช้บ่อยๆ มีดังนี้

กำหนดให้

const 
Arr1:array[1..2] of integer = (10,20);
Arr2:array[5..8] of integer = (5,6,7,8);

writeln(Low(Arr1)); // = 1
writeln(Low(Arr2)); // = 5

writeln(High(Arr1)); // = 2
writeln(High(Arr2)); // = 8

writeln(Length(Arr1)); // = 2
writeln(Length(Arr2)); // = 4