Statemen-statemen untuk memanipulasi data.

Statemen-statemen untuk memanipulasi data.
# Pred [fungsi].
              Memberikan nilai sebelum nilai argumen dalam urutannya  dalam
              ASCII.
              Sintaks:  Pred (x);

# Succ [fungsi].
              Memberikan nilai sesudah nilai argumen dalam urutannya  dalam
              ASCII.
              Sintaks:  Succ (x);

# Inc[fungsi].
              Menambah (increments) nilai suatu variabel.
              Sintaks:  Inc (x,i);        {i >= 1}

# Dec [fungsi].
              Mengurangi (decrements) nilai suatu variabel.
              Sintaks:  DEC(x,i);        {i >=1}
              Contoh :
               Progam Man_Data;
               Uses Crt;
               Type
                    hari = (hr0,hr1,hr2,hr3,hr4,hr5,hr6,hr7)
               Var
                    urutanhr : hari;
               Const
                    namahr : Array [hr1..hr7] of String [6]=
                             ('Senin','Selasa','Rabu','Kamis',
                              'Jumat','Sabtu','Minggu');
               Begin
                    Writeln('Daftar Nama Hari);
                    urutanhr := hr0;
                    While Urutanhr < hr7 DO
                      Begin
                         urutanhr := Succ(urutanhr);
                            Write('hari ke ',Ord(Urutanhr):2,' adalah ');
                            Writeln(namahr[urutanhr]);
End;
               End.

               hasilnya adalah :
                     Daftar Nama Hari
                     hari ke  1 adalah Senin
                     hari ke  2 adalah Selasa
                     hari ke  3 adalah Rabu
                     hari ke  4 adalah Kamis
                     hari ke  5 adalah Jumat
                     hari ke  6 adalah Sabtu
                     hari ke  7 adalah Minggu