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

UptoLike

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

194
Пример:
Вывод элемента массива: Вывод поля записи:
Write(a[i],’ ‘); Write(L.Y,’ ‘);{вывод поля Y}
Если в качестве поля записи используется другая запись (как в типе
TLine или TCircle), то при обращении к такому полю сначала указывается
имя записи, затем через точкуимя поля этой записи, а затем через
вторую точкуимя поля для поля типа запись.
Пример: Введем и выведем запись типа TLine
Var
LL:TLine;
Begin
{Ввод записи}
Read(LL.p1.X); {ввод X координаты первой точки p1}
Read(LL.p1.Y); {ввод Y координаты первой точки p1}
Read(LL.p2.X); {ввод X координаты второй точки p2}
Read(LL.p2.Y); {ввод Y координаты второй точки p2}
Read(LL.Color); {ввод цвета}
{Вывод записи}
Writeln(LL.p1.X); {вывод X координаты первой точки p1}
Writeln (LL.p1.Y); {вывод Y координаты первой точки p1}
Writeln (LL.p2.X); {вывод X координаты второй точки p2}
Writeln (LL.p2.Y); {вывод Y координаты второй точки p2}
Writeln (LL.Color); {вывод цвета}
End.
И здесь есть сходство с массивами, на этот раз с двумерными. Для
обращения к элементу двумерного массива сначала указывается имя
массива, затем в квадратных скобках два индекса элемента.
Пример:
Ввод элемента массива: Ввод поля записи:
Read(kk[1,4]); Read(LL.p1.X);