Of

Vyhrazené slovo of je použito v deklaracích typů pole, množina, soubor a v příkazech case.

Syntaxe

identifikátor =array[X..Y] of type
identifikátor =set of type
identifikátor =file of type
case výraz of <případ seznam příkazů>

Priklady

identifikátor =array[X..Y] of type

{ Deklarace pole }
type Seznam   =array[1..100] of Integer;
     Cetnost  =array['A'..'Z'] of Byte;
     Matice   =array[0..9, 0..9] of real;

{ typ množina }
type
  Den =(Po, Ut, Str, Ctv, Pa, So, Ne);
  Znaky   =set of Char;
  Cislice =set of 0..9;
  Dny     =set of Day;
{ Deklarace typu soubor }
type
  Osoba  =record
     Jmeno    : string[15];
     Prijmeni : string[25];
     Adresa   : string[35];
  end;
  SouborOsob  =file of Person;
  SouborCisel =file of Integer;
  SwapFile    =file;
{ pří­kaz case }
case Ch of
  'A'..'Z', 'a'..'z':  WriteLn('Písmeno');
  '0'..'9':            WriteLn('Číslice');
  '+', '-', '*', '/':  WriteLn('Operátor');
else
  WriteLn('Speciální­ znak');
end;