Массив – это упорядоченная последовательность из фиксированного числа однотипных элементов

1.

2.

Массив – это упорядоченная последовательность из
фиксированного числа однотипных элементов,
которая обозначается одним именем.
В программировании различают следующие типы
массивов:
1) Одномерные массивы (линейные таблицы);
2) Двумерные массивы (прямоугольные таблицы);
3) Многомерные массивы (трехмерные и т.д. таблицы).
Для того, чтобы обратиться к нужному элементу массива
необходимо указать имя массива и его индекс. Индекс –
это порядковый номер элемента в массиве.
Т.е. обращение происходит по правилу:
идентификатор_массива[индекс]
Общее количество элементов в массиве называется
размерностью массива

3.

Для описания массива в Паскале используют два метода:
1. с описанием пользовательского типа:
type
идентификатор_типа=array[размерность] of базовый_тип_элементов;
var
идентификатор_массива:идентификатор_типа;
2. без описания пользовательского типа:
var
идентификатор_массива:array[размерность] of
базовый_тип_элементов;
Здесь размерность указывается следующим образом:
[1..10]
[10..100]
[5..10]
одномерные массивы
[1..5]
[1..10,1..10] – двумерные массивы

4.

Заполнение массивов
- с клавиатуры;
- с помощью датчика случайных чисел;
- с помощью формулы.

5.

Заполнение массивов с клавиатуры
Пример Заполнить массив А с клавиатуры
for i:=1 to 5 do
begin
writeln ('a[', i, ']=');
readln ( a[i] );
end;
a[1] =
a[2] =
a[3] =
a[4] =
a[5] =
13
10
15
20
25

6.

Заполнение массива случайными числами
Число из интервала [0, M-1]
random (М)
Вещественное число от 0 до 1
random
Число из интервала [a, b]
random (b-a+1)+a
for i:=1 to 10 do
begin
a[i]:=random(101); {числа от 1 до 100}
end;

7.

Заполнение массива
с помощью формулы
Пример. Заполнить одномерный массив из 10
чисел по формуле b[i]:=i*3 .
var b: array [1..10] of integer;
i: integer;
begin
for i:=1 to 10 do
b[i]:=i*3;
end;

8.

Вывод массива
Для одномерного массива А из 3 элементов:
var A: array [1..3] of integer;
i: integer;
Begin
writeln('Массив А:');
For i:=1 to 3 do
На экране
writeln (А[i]:4);
Массив А:
End;
4 5 7

9.

Ввод-вывод элементов:
Program _1;
Uses Crt;
var
a:array[1..10] of integer;
i:byte;
Begin
Writeln(‘Введите элементы массива:’);
For i:=1 to 10 do
begin
write(‘a[‘,i,’]=’);
Readln(a[i]);
end;
For i:=1 to 10 do
Writeln(a[i]);
End.

10.

Для нахождения некоторого элемента в заданном
неупорядоченном массиве
используется алгоритм линейного
(последовательного) поиска.
Слово «последовательный» содержит в себе
основную идею метода.
Начиная с первого, все элементы массива
последовательно просматриваются и
сравниваются с искомым. Если на каком-то шаге
текущий элемент окажется
равным искомому, тогда элемент считается
найденным, и в качестве результата
возвращается номер этого элемента, либо другая
информация о нем.

11.

Program Summa;
uses Crt;
var
a:array[1..10,1..10] of integer;
I,j:byte, S: integer;
begin
writeln('введите элементы массива:');
for i:=1 to 10 do
for j:=1 to 10 do
begin
write(‘а[‘,I,’,’,j,’]=‘);
readln(a[i,j]);
end;
for i:=1 to 10 do
For i:=1 to 10 do
S:=s+a[i,j];
writeln('S=',S);
end.

12.

Program Srednee;
uses Crt;
var a:array[1..100] of integer;
i,n,S:integer; Sr:real;
begin
writeln('введите размерность массива:');
Readln(n);
writeln('введите элементы массива:');
for i:=1 to 10 do
begin
write('а[',i,‘]=');
readln(a[i]);
end;
for i:=1 to n do
S:=s+a[I];
Sr:=S/n
writeln('Sr=',Sr);
end.

13.

var a:array [1..100,1..100] of integer;
i,j,n,m,S:integer; Sr:real;
begin
writeln('введите размерность массива:');
readln(n,m);
writeln('введите элементы массива:');
for i:=1 to n do
for j:=1 to m do
begin
write('a[',i,',',j,']=');
readln(a[i,j]);
end;
for i:=1 to n do
for j:=1 to m do
S:=s+a[i,j];
sr:=S/(n*m);
writeln('sr=',sr);
end.