Тип-массив можно вводить непосредственно при определении переменных или типизированных констант.

ПРИМЕРЫ:

Тип-массив задается непосредственно в разделе описания переменных VAR.

( слайд 8)

TYPE

mass = array[1..5] of integer;

CONST n=4; m=10;

Var

a1, b1, c1 : array[1..5] of integer;

a5 : mass;

a2 : array[1..m] of real;

a3 : array[1..5,1..3] of integer;

b3 : array[1..n,1..n] of real;

Для массивов идентичного типа, т.е. описанных одним TYPE, передать все элементы из одного массива в другой можно единственным оператором.

Допустим оператор b1 := a1;

{после этого присваивания все 5 элементов массива b1 получат те же значения, что и в массиве a1}

При таком объявлении массивов a1, a5 следует помнить, что их типы не будут идентичными, даже если они имеют одинаковую структуру. Поэтому передавать их как параметры в подпрограмму нельзя, нельзя также присвоить одному массиву значения другого массива – в таком случае допустимо лишь покомпонентное присваивание.

Недопустим оператор a5 :=a1;

4. Тип-массив задается непосредственно в разделе описания констант. ( слайд 9)

CONST

a1 : array[1..4] of integer = (1, 4, 3, 7);

a2 : array[1..2,1..2] of real = ((1., 4.),

(5., 7.));

a3 : array[1..3] of char = (‘n’, ‘o’, ‘t’);

В отличие от простых констант типизированные константы представляют собой инициализированные переменные, которые могут использоваться в программах наравне с обычными переменными.

5.Встроенный тип элементов. ( слайд 10)

Так как < тип элементов >, идущий за кодовым словом OF, - любой тип Турбо-Паскаля, то он может быть и другим массивом, например:

a).Type

matr = array[1..4] of array[1..3] of real;

b). Type

mass = array[1..3] of real;

matr = array[1..4] of mass;

Var

x, y : matr;

sr : mass;

X, Y - матрицы размерностью не

более (4x3) .

SR – одномерный массив размерностью

не выше 3.

c). Более компактная запись для a) и b):

TYPE

matr = array[1..4,1..3] of real;

3. Ввод – вывод одномерных массивов.

Значения элементов одномерного массива ( вектора ) можно ввести в программу следующими способами:

1). типизированной константой;

2). ввод с клавиатуры;

3). ввод из файла;

Значения отдельных элементов массива можно задать оператором присваивания.

Вывод элементов массива и результатов вычислений :

1). на экран;

2). в файл.

Рассмотрим пример ( слайд 11, 12, 13)

Program Vvod;

TYPE mass = array[1..5] of integer;

CONST A: mass = ( 2, -4, 3, -6, 8 );

VAR B: mass;

C: array[1..4] of integer;

i: integer;

BEGIN

{ ввод массива B с клавиатуры }

writeln(‘ введите 5 эл-тов массива B‘);

FOR i := 1 TO 5 DO read(b[i]);

{ ввод массива C с клавиатуры }

writeln(‘ введите 4 эл-та массива С‘);

FOR i := 1 TO 4 DO read(c[i]);

{ вывод массива A на экран }

writeln(‘ массив A:’);

FOR i := 1 TO 5 DO

write(A[i]:5);

writeln; {выводится вектор-строка}

{ вывод массива B на экран }

writeln(‘ массив B:’);

FOR i := 1 TO 5 DO

writeln(B[i]);

{выводится вектор-столбец}

{одновременная печать массивов A и B}

FOR i := 1 TO 5 DO

writeln(‘A[‘ , i , ‘]=’ , A[i]:3 ,‘ B[‘ , i , ‘]=’ ,B[i]:3);

writeln;

end.

На экране будет напечатано:

введите 5 эл-тов массива B

5 6 9 1 12

введите 4 эл-та массива С

0 5 8 2

массив A:

2 -4 3 -6 8

массив B:

A[1]=2 B[1]=5

A[2]=-4 B[2]=6

A[3]=3 B[3]=9

A[4]=-6 B[4]=1

A[5]=8 B[5]=12