Работа с массивами. lt;Имя массива>:Array[<диапозон>] of <тип компонент>;

Работа с массивами

Цель: научиться использовать тип данных массив при написании программ.

Массив - это набор последовательно проиндексированных элементов одного и того же типа. Каждый элемент имеет уникальный номер (индекс), с помощью которого к элементу массива можно обращаться, как к переменной.

Массивы бывают одномерные (математический эквивалент одномерного массива - вектор), двумерные (математический эквивалент - матрица), многомерные (n-мерные).

Описание одномерного массива:

Var

<Имя массива>:Array[<диапозон>] of <тип компонент>;

Например:

Var

X : array[1..100] of integer; {Описание одномерного массива из 100 элементов целого типа}

Элементы массива выбираются с помощью конструкции, называемой «индексированной переменной» и имеющей вид: X[I], где Х – имя массива, I - индекс.

Задание 1. Создать массив A размерности N, используя способ задания элементов массива:

1) константа типа массив;

2) ввод элементов с клавиатуры;

3) заполнение случайными числами, при помощи функции Random.

Задание 2. Найти среднее арифметическое элементов массива А размерности N.

1) Рассмотреть программу решения задачи. Объяснить работу программы.

const N=10;

VAR A: array[1..N] of REAL;

i: integer;

S, AV: real;

begin

S:=0;

FOR I:=1 TO N do begin

write ('введите', I, '-ый элемент');

readln (A[i]);

S:= S+A[i];

end;

AV:= S/N;

writeln ('среднее арифметическое =',AV);

end.

2) Проверить работу программы на компьютере.

Задание 3.Составить программу, которая заполняет массив из 15 элементов следующими значениями A[i]:=i/(i+1), затем находит наибольший элемент массива и его номер.

1) Рассмотреть программу решения задачи.

Const N=15;

Type Vector=Array[1..N] of Real;

Var A:Vector;

i:Integer;

Max: Real;

Nmax:Integer;

12 Следующая ⇒