Массивы. Что такое массив?

1. Массивы

2. Что такое массив?

Массив – фиксированное количество
элементов одного типа, объединенных
одним именем
Назначение: хранение данных
А:
-10
-5
2
3
0
-7
-24
1
2
3
4
5
6
7
Имя массива
Значение элемента
Индекс (номер)

3. Размерность

Номер элемента – данные любого перечисляемого типа.
Число элементов массива (размерность)
фиксируется при описании и
не меняется в процессе выполнения программы

4. Обращение к элементам массива

А:
-10
-5
2
3
0
-7
-24
1
2
3
4
5
6
7
a[i]
a [ 2 ]=-5
Значение элемента
Имя массива
Индекс (номер)

5. Описание массива

Var a: array [n1..n2] of <тип элементов>;
Номер первого элемента
Номер последнего элемента

6. Примеры описаний

7. Операции над элементами массива

Те же, что и над элементами данного
типа

8. Вывод массива

По одному элементу
For i:= 1 to n do write (a[i]:4);
Writeln;

9. Ввод массива

По одному элементу
С клавиатуры
С помощью оператора присваивания
Из файла
Описание массива как константы

10. Ввод с клавиатуры

Var a: array[1..40] of integer;
i, n:integer;
Begin
writeln(‘введите размерность массива’);
readln(n);
Ввод с клавиатуры
for i:=1 to n do read (a[i]);
for i:= 1 to n do write (a[i]:4);
writeln;
Вывод массива
End.

11. Ввод с помощью оператора присваивания

Var a: array[1..40] of integer;
i, n:integer;
Begin
writeln(‘введите размерность массива’);
readln(n);
for i:=1 to n do a[i] := X;
Заполнение массива
for i:= 1 to n do write (a[i]:4);
writeln;
Вывод массива
End.

12. Пример1.

A:
1
2
3
4
i:
1
2
3
4
Заполнить массив элементами, равными своему
порядковому номеру ( 1, 2, 3, 4,…)
Var a: array[1..40] of integer;
i, n:integer;
Begin
writeln(‘введите размерность массива’);
readln(n);
for i:=1 to n do a[i] := i;
for i:= 1 to n do write (a[i]:4);
writeln;
End.

13. Задания

1.
2.
3.
Заполнить массив символом ‘*’.
Заполнить массив элементами, равными
половине квадрата своего порядкового
номера.
Заполнить массив по образцу:
1.
2.
3.
123123123123123…
01230123
abcabcabc

14. Генератор случайных чисел

Randomize; - процедура, задающая
начальное значение последовательности
случайных чисел.
Y:=random(x);
– функция, генерирующая
целое число из отрезка [0 , x)
Y:=random( B-A+1)+A;
– функция, генерирующая
целое число из отрезка [A,B]
Длина отрезка
Точка отсчета

15. Генератор случайных чисел

Y:=random ;
Y:=random*( B-A+1)+A;
– функция, генерирующая
вещественное число из
отрезка [0 , 1)
– функция, генерирующая
вещественное число из
отрезка [A,B]
Длина отрезка
Точка отсчета

16. Пример 1

Заполнить массив случайными целыми числами из
отрезка [-5,7].
Var a: array[1..40] of integer;
i, n:integer;
Begin
writeln(‘введите размерность массива’);
readln(n);
randomize;
for i:=1 to n do a[i] := random(13) - 5;
for i:= 1 to n do write (a[i]:4); writeln;
End.