Array/ja

│ Deutsch (de) │ English (en) │ español (es) │ suomi (fi) │ français (fr) │ Bahasa Indonesia (id) │ 日本語 (ja) │ русский (ru) │ 中文（中国大陆）‎ (zh_CN) │

配列 は、同じ種類の variables の集まりの種類です。 例えば、 char や、 integer や, real の配列です。 実際に、ユーザー定義型を含むどのような種類の変数に対しても、配列の形に扱うことができます。 しかしながら、 配列の要素は同じ種類の変数である必要があります。 異なる種類の変数は、ひとつの配列の中に集めることはできません。 この目的のためには、 record を参照してください。

Arrays reflect the mathematical concept of

• vectors (one-dimensional array) and
• matrices (two-dimensional array)

静的配列

The declaration works similar to that for simple types, but you need to add the number of elements via an index range, as well as the array element type.

program
...
var 
  variablename: array [startindex..endindex] of type;
begin
  ...

startindex must be less than or equal to endindex, and both must resolve to an integer constant, either an integer value or a const value that is an integer. Either or both numbers may be negative or zero.

１次元配列

One-dimensional array example:

type
  simple_integer_array = array [1..10] of integer;
 
var
  Numbers: simple_integer_array;

多次元配列

Multidimensional arrays are supported such as [x..y,z..t] and so on.

Multidimensional array example:

type
  more_complex_array = array [0..5,1..3] of extended;
 
var
  specialmatrix: more_complex_array;

動的配列

If it is not possible to know the exact number of array elements needed at the time of the program compilation, the dynamic array type can be used. A dynamic array can grow or shrink in size during program execution.

Element Access

To access an array element you need to include the element position between brackets ([]) along with the name of the array variable. The element can then be used like a simple variable. But if you want to use parameters you MUST use a structure because else it will cause errors or bugs... (I do not understand, what is meant here).

Var
   my_array   : array[1..3] of Integer;
   my_matrix  : array[1..5,1..5] of Integer;
   some_value : Integer;
...
begin
   my_array[2]    := a + 2;
   my_matrix[2,3] := some_value;
   ...
   some_value := my_array[2];
   some_value := my_matrix[4,3];
end.

Array Literals

There are two formats used for array literals, depending on where they are placed. In the variable declaration section, you can initialize static arrays (it is not possible with dynamic arrays) with a series of values placed inside parentheses. In a statement block you can create an anonymous array with a series of values inside of brackets. For example:

Var
   // initialize static integer array via array literal
   Numbers : array [1..3] of Integer = (1, 2, 3);
   
procedure PrintArray(input : array of String);
var 
   i : integer;
begin
    for i := 1 to length(input) do
       write(input[i - 1],' ');
    writeln;
end;

begin
    Writeln( Numbers[2] );
    // create three item anonymous string array via an array literal
    PrintArray( ['one', 'two', 'three'] );
end.

Output:
2
one two three