Партнерка на США и Канаду по недвижимости, выплаты в крипто
- 30% recurring commission
- Выплаты в USDT
- Вывод каждую неделю
- Комиссия до 5 лет за каждого referral
Тема: Массивы
Массив – упорядоченный набор однотипных данных, имеющих одно общее имя.
Каждый элемент массива имеет свой номер (номера).
К любому элементу массива можно обратиться по имени массива и по номеру этого элемента, который записывается в [ ] после имени.
Массив – индексированная переменная (переменная с индексом).
Имя массива задаётся так же, как и имя любой переменной.
По своей структуре массивы можно разделить на одномерные, двухмерные, трехмерные и т. д. (многомерные)
Одномерные массивы обычно записываются в одну строку или в один столбец.
Двухмерные массивы обычно записываются в виде таблицы (матрицы).
(Трехмерные массивы – в виде трехмерной матрицы.)
Размер (размерность) одномерного массива – это количество элементов в этом массиве.
Размерность двухмерного массива – это количество строк и столбцов в массиве.
Размерность трёхмерного массива – это количество строк, столбцов и слоёв в массиве.
По типу элементов массивы можно разделить на числовые и текстовые (символьные, строковые).
Объявление одномерного массива:
Var Имя массива: array [Нижний индекс .. Верхний индекс] of Тип Элементов;
Объявление двухмерного массива:
Var Имя массива: array [Нижний индекс1 .. Верхний индекс1,
Нижний индекс2 .. Верхний индекс2] of Тип Элементов ;
Способы задания (заполнения) массивов в программе:
1. С помощью оператора присваивания:
begin
A[1]:= 3.15;
A[2]:= -6;
A[3]:= …
При большом числе элементов этот способ не удобен, т.к. занимает много места в программе.
2. Элементы массива вводятся с клавиатуры:
Program f1;
var B: array [1..20] of integer; a: integer;
begin
for a:= 1 to 20 do
begin
writeln (‘введите элемент массива’);
readln (B [a])
end;
…
3. С помощью генератора (датчика) случайных чисел:
Program f3;
var B: array[1..20] of integer; a: integer;
begin
randomize;
for a:= 1 to 20 do
begin
B[a]:= random(15);
Writeln (a, B[a]: 7)
end;
…
readln
end.
4. С помощью формул, например:
B[a]:= а* а – 8* а + 1.
Чему будет равен первый член массива В? (-6)
5. В разделе констант, например:
Program f5;
const B: array[1..5] of real= (-1, 2, 3.5, 17, 0);
var a: integer;
begin
…
Задача. Массив из 10 элементов задан генератором случайных чисел. Элементы массива в диапазоне от 0 до 8. Найти сумму всех элементов массива.
Program f5;
var B: array[1..10] of integer; a, S: integer;
begin
randomize;
for a:= 1 to 10 do
begin
B[a]:= random (8);
Writeln (a, B[a]: 7);
S:= S + B[a]
end;
writeln (‘сумма ‘, S);
readln
end.


