Шпора по информатике для контрольной номер 1 по типам данных в Pascal (для КМ-1-03):

Тип поддиапазон
0..100
type TMySubSet=0..100 (‘a’..’z’);
var MySubset:TMySubSet;
begin
MySubSet:=0;
…..

Записи
type <название>=record;
Назв поля: тип поля;
…..
end;
--
Name: TMedFirm;
City: string
var T:<название>
begin
T.name:=’…’;
T.city:=’…’;
End.

Множества
Type TMySet=set of 0..255 (...,…,…);
Var MySet:TMySet;
Begin
MySet:=[…,…,…];

+ [1,2,3]+[3,4,5]=[1,2,3,4,5] - объед
- [1,2,3]-[3,4,5]=[1,2] - разность
* [1,2,3]*[3,4,5]=[3] – пересеч

Указатели
Var P:^integer
X.Y:integer
Begin
X:=33;
P:=@X; – присваивается адрес пер X
Y:=P^; - получения значения по адресу в P

Динамич переменная
Var P:^real;
Begin
New(P);
P^=10;
Dispose(P);
End.

Варианты
Var V:Variant;
Begin
V:=1;

VarType (v) – возвр тип; varString
VarAsType
V2:=VarAsType (v1, varDouble)
VarArrayCreate (создаёт стат массив_
V:=VarAr…([1..100], varByte).

Дин массив
Type TDynArray: array of integer;
Var a:TDynArray;
Begin
SetLength (a,20);
a[0]:=2;
a:=nil

Многомер дин массив
Type TDynArray: array [1..10] of array [1..10] of real;
Var D: TDyn…
Begin SetLength (D,4);
SetLength (D[0], 3);
….[1]…
D[0,0]:=2

Упакованные типы
Type TArr=packed array [1..5] of integer;
Type TRec=packer record;
N:integer;
S:string;
End;
Ord – номер порядка Эл-та пересеч типа
Pred – пред по порядку знач Pred(3)=2
Succ(3)=4
High – макс знач для типа
Low
SizeOf – размер элтов данных типа в байтах
Round – окр до ближ целого