start := 1000;+
−
x := start;+
−
y := start;+
−
z := start;+
−
while 0 < x do {+
−
 while 0 < y do {+
−
  while 0 < z do {+
−
    z := z - 1+
−
  };+
−
  z := start;+
−
  y := y - 1+
−
 };     +
−
 y := start;+
−
 x := x - 1+
−
};+
−
write x;+
−
write y;+
−
write z+
−