BEGIN
   DECLARE INT x, INT d, INT e, BOOL y, INT z, INT a, BOOL b, INT c;
   x := 0;
   y := FALSE;
   z := a * (b+c);
   WHILE y
   DO
   a := 12;
   b := TRUE;
   d := 0;
   d := 1;
   d := 2;
   e := d + a;
   c := 0;
   c := a *z*x
   OD
END
