Массивы (PascalABC.NET): различия между версиями
| Строка 66: | Строка 66: | ||
var b := new real[7]; // массив из 7 вещественных элементов | var b := new real[7]; // массив из 7 вещественных элементов | ||
var c := new boolean[4]; // массив из 4 логических элементов | var c := new boolean[4]; // массив из 4 логических элементов | ||
| + | </syntaxhighlight> | ||
| + | |||
| + | Можно создать массив и обнулить его элементы следующим образом: | ||
| + | <syntaxhighlight lang="pascal" line> | ||
| + | var a := |0| * 15; // создан массив из 15 нулевых элементов | ||
| + | </syntaxhighlight> | ||
| + | |||
| + | В случае, когда массив был описан заранее, его длину можно установить (либо поменять) вызовом процедуры SetLength. | ||
| + | |||
| + | <syntaxhighlight lang="pascal" line> | ||
| + | var a1: array of integer; // массив целых | ||
| + | SetLength(a1, 13); // установлена длина массива a1, равная 13 | ||
| + | </syntaxhighlight> | ||
| + | |||
| + | == Вывод массива == | ||
| + | |||
| + | === Вывод массива с помощью цикла с параметром === | ||
| + | <syntaxhighlight lang="pascal" line> | ||
| + | Begin | ||
| + | var a:= new integer[15]; | ||
| + | for var i := 0 to a.Length-1 do | ||
| + | Write(a[i], ' '); | ||
| + | end. | ||
| + | </syntaxhighlight> | ||
| + | |||
| + | === Вывод массива методом Print === | ||
| + | Метод предполагает необязательный параметр обозначающий разделитель. | ||
| + | <syntaxhighlight lang="pascal" line> | ||
| + | Begin | ||
| + | var a:= ArrRandom(10, -10, 10); | ||
| + | a.Println(); | ||
| + | a.Println(', '); | ||
| + | end. | ||
| + | </syntaxhighlight> | ||
| + | |||
| + | |||
| + | <syntaxhighlight lang="pascal" line> | ||
</syntaxhighlight> | </syntaxhighlight> | ||
Версия 07:49, 13 января 2023
Pascal ABC.NET выбор школьника - Часть 2
Массив
Массив – хранимая нумерованная последовательность однотипных элементов с непосредственным доступом к любому элементу по его индексам, являющимся своеобразным аналогом номера.
Статические и динамические массивы
Статические массивы
Память под статический массив распределяется на этапе компиляции программы. Одновременно может быть выполнена инициализация элементов массива. Границы индексов статического массива неизменны и должны быть указаны в программе константами или выражениями, содержащими только константы.
Статические массивы – дань совместимости с более ранними версиями языка Паскаль.
Длину статического массива нельзя менять.
Динамические массивы
Динамический массив нужного размера может быть создан в том месте программы, где он впервые потребуется.
В динамических массивах индексы начинаются от нуля.
Количество элементов в динамическом массиве может меняться, но никогда не может стать отрицательным. Текущее количество элементов в массиве хранится в поле .Length.
Первый элемент массива всегда имеет индекс ноль.
Создание и инициализация массива
Статические массивы
Статический массив обычно описывается в виде
var ИмяМассива: array[m..n] of ТипЭлементов;
1 var a: array[0..12] of byte; // 13 элементов byte
2 var b, c: array[-5..8] of real; // два массива по 14 элементов real
3
4 var a: array[3..6] of integer := (1, 2, 3, 4);
Динамические массивы
Описание и инициализация динамического массива отличаются лишь тем, что границы индексов не оказываются. Вследствие этого компилятор не может отвести место под такой массив и необходимая память выделяется во время выполнения программы.
1 var a1: array of integer; // массив целых чисел
2 var p: array of real; // массив вещественных чисел
3 var q: array of boolean; // массив логических элементов
Проще всего создать динамический массив при помощи функции Arr, возвращающей такой массив. Ее аргументы – единого типа перечисленные через запятую члены будущего массива. Вместо Arr( ) удобно использовать более короткую конструкцию | |.
1 var a := Arr(1, 9, -4, 12, 40, 39, 54);
2 var d := |1, 9, -4, 12, 40, 39, 54|; // альтернативный вариант
3 var b := |3.5, 2.0, 6.417, -12.0|;
4 var c := Arr(True, 3.5 > 1.63 ** 2.95, Sin(x) > 1, False, False);
Можно совместить описание динамического массива с его созданием, для чего потребуется указать необходимую длину массива.
1 var a := new integer[10]; // массив из 10 целых элементов
2 var b := new real[7]; // массив из 7 вещественных элементов
3 var c := new boolean[4]; // массив из 4 логических элементов
Можно создать массив и обнулить его элементы следующим образом:
1 var a := |0| * 15; // создан массив из 15 нулевых элементов
В случае, когда массив был описан заранее, его длину можно установить (либо поменять) вызовом процедуры SetLength.
1 var a1: array of integer; // массив целых
2 SetLength(a1, 13); // установлена длина массива a1, равная 13
Вывод массива
Вывод массива с помощью цикла с параметром
1 Begin
2 var a:= new integer[15];
3 for var i := 0 to a.Length-1 do
4 Write(a[i], ' ');
5 end.
Вывод массива методом Print
Метод предполагает необязательный параметр обозначающий разделитель.
1 Begin
2 var a:= ArrRandom(10, -10, 10);
3 a.Println();
4 a.Println(', ');
5 end.