Программирование в среде Турбо Паскаль. Закутский С.Н - 35 стр.

UptoLike

ВУЗ: 

ВГУ | Воронеж

Составители: 

Рубрика: 

35
Type
81
index = -50..50;
Var x : array [index] of real;
В тех случаях, когда возможно изменение значений граничных индек-
сов, при описании массива может оказаться целесообразным использова -
ние в качестве указателей граничных индексов имен констант. Например:
Const nmax = 50;
Var x : array [nmax] of real;
Очевидно , если потребуется изменить максимальный размер массива ,
то в тексте программы достаточно исправить значение константы, исполь-
зуемой для определения граничных индексов.
При втором способе описания сначала определяется новый тип дан-
ных, представляющих собой характеристики массивов, которые предпола-
гается использовать в данной программе, а далее имена указанных типов
используются для описания соответствующих переменных. Пример:
Type Matrix = array [1..5,1..5] of word;
Var a,b : Matrix;
Для иллюстрации приемов работы с массивами рассмотрим несколько
примеров.
Примеры 1 и 2 иллюстрируют организацию ввода и вывода элементов
одномерного массива и матрицы .
{Пример 1. Организация ввода-вывода элементов одномерного массива}
{ввод с клавиатуры; вывод на экран дисплея}
Var Vector
82
: array [1..10] of integer;
i,n : byte;
a : real;
BEGIN
Write('n = ');
ReadLn(n); {Определение реальных размеров цикла}
Write('Vektor = ');
For i:=1 to n do
Read(Vector[i]);
WriteLn; {Переход на новую строку после окончания ввода элементов
массива}
WriteLn('элементы массива = ');
For i:=1 to n do
WriteLn(Vector[i], ' ');
END.
{Пример 2. Организации ввода-вывода элементов матрицы}
{ввод с клавиатуры; вывод на экран дисплея}
Const n = 10;
m = 10;
81
Type [тайп ] – тип .
82
Vector [векто ] – вектор.

Страницы