Основы программирования на языке Turbo Pascal. Беляева И.В. - 14 стр.

UptoLike

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

Рубрика:

Примеры использования в качестве индексов порядковых типов:

Var {Примеры объявления массивов}

A : Array [Byte] of integer; {Массив A, состоящий из 256

элементов, нижняя граница индекса 0, верхняя 255}

B : Array [Char] of real; {Массив B, состоящий из 256

элементов, нижняя граница индекса #0(символ с кодом 0),

верхняя граница индекса #255(символ с кодом 255)}

I : Byte; {Переменная, используемая как индекс массива A}

C : Char; {Переменная, используемая как индекс массива B}

Begin {Примеры обращения к элементам массива}

A[45] := 0; {В элемент массива A, имеющий индекс 45,

записали 0}

B[‘t’] := 2.4; {В элемент массива B, имеющий индекс ‘t’,

записали 2.4}

I := 200; {i присвоили значение 200}

C := ’#’; {c присвоили значение ‘#’}

A[i] := 23400; {В элемент массива A, имеющий индекс i=200,

записали 23400}

B[c] := 123.456; {В элемент массива B, имеющий индекс c=’#’,

записали 123.456}

End.

Обычно в качестве индекса используют диапазон значений какого-

либо перечисляемого типа.

Например:

Var {Примеры объявления массивов}

C : Array [-10..5] of integer; {Массив C, состоящий из

16 элементов, нижняя граница индекса -10, верхняя 5}

D : Array [‘A’..’Z’] of char; {Массив D, состоящий из

26 элементов, нижняя граница индекса ’A’,

верхняя граница индекса ‘Z’}

j : -10..5; {Переменная, используемая как индекс массива C}

c1 : ‘A’..’Z’; {Переменная, используемая как индекс