Реферат: Object Pascal
содержат ошибку, т. к. константа Wednesday используется дважды.
3.9. Ограниченные типы
Этот тип формируется самим пользователем посредством сужения значений ранее определенного или стандартного типов.
Примеры:
Type
Diapason = 1 .. 30;
Letters = 'a' .. 'v';
TList = (t1, t2, t3, t4, t5, t6,t7, t8, t9, t10);
TlistSmall = (t2 .. t8);
3.10. Вариантный тип (Variant)
Тип Variant – особый тип языка Object Pascal. Значение этого типа наперед неизвестно, однако может быть определено через присваиваемое значение одним из следующих типов: все целые, вещественные, строковые, символьные и логические типы, за исключением Int64.
Следующие примеры демонстрируют использование типа Variant и механизм конверсии типов при смешивании его с другими типами. Сопроводи-тельные комментарии поясняют правила, при помощи которых операторы присваивания меняют тип Variant-переменных в зависимости от принятого ими значения.
Var
V1, V2, V3, V4, V5: Variant; {описание Variant-переменных }
I: Integer;
D: Double;
S: string;
...
begin
V1 := 1; { integer-значение }
V2 := 1234.5678; { real-значение }
V3 := 'Иванов'; { string-значение }
V4 := '1000'; { string-значение }
V5 := V1 + V2 + V4; { real-значение 2235.5678}
I := V1; { I = 1 (integer-значение) }
D := V2; { D = 1234.5678 (real-значение) }
S := V3; { S = ' Иванов' (string-значение) }
I := V4; { I = 1000 (integer-значение) }
S := V5; { S = '2235.5678' (string-значение) }