begin
  integer i, j, k, l

userlab:

  printstring("until:")
  cycle
    printstring("until exit:")
    exitif i=k
    printstring("until continue:")
    continueif k=l
    printstring("until repeat:")
  repeatuntil i=j

  printstring("while:");
  while j#k cycle
    printstring("while exit:")
    exitif i=k
    printstring("while continue:")
    continueif k=l
    printstring("while repeat:")
  repeat

  printstring("for:");
  for i = j,1,k cycle
    printstring("for exit:")
    exitif i=k
    printstring("for continue:")
    continueif k=l
    printstring("for repeat:")
  repeat

->userlab

endofprogram