Die Prozedur Dec dekrementiert eine Variable um 1. Dec subtrahiert von der angegebenen Variablen den Wert Eins. X ist eine Variable vom Typ Ordinal oder ein Zeigertyp, falls die erweiterte Syntax aktiviert ist. X dekrementiert um 1; d.h., dass Dec(X) der Anweisung X := X - 1 enspricht. Dec erzeugt jedoch hochoptimierten Maschinencode und ist besonders für enge Schleifen geeignet.