BEGIN
  INTEGERARRAY BAD(1:2)
  INTEGER I,J
  J = 1
  CYCLE
    I = J + BAD(J)
    I = J * BAD(1)
    I = BAD(J)
    I = BAD(1)
    J = J+1
  REPEAT
ENDOFPROGRAM