program PLIK; var pliczek : file of Word; liczba : Word; begin Assign (pliczek, 'ZBIOR.TYP'); Rewrite (pliczek); liczba:=43210; Write (pliczek, liczba); Close (pliczek) end.
x:='z'; Dec(x, -2);gdy deklaracja zmiennej ma postać
var x : Char;
x:=c; x:=Pred(Succ(Pred(x)));gdy deklaracja zmiennej ma postać
var x : (a, b, c, d, e);
x:='C'; x:=Pred(Succ(Pred(x)));gdy deklaracja zmiennej ma postać
var x : 'A'..'E';
y:='C'; x:=Ord(Pred(Succ(Pred(y))));gdy zmienne x i y zadeklarowano następująco:
var y : 'A'..'E'; x : Byte;