Repeat statements specify the repeated execution of a statement sequence depending on the value of a Boolean expression. The expression is evaluated after each execution of the statement sequence, and the repetition stops as soon as it yields the value TRUE. Hence, the statement sequence is executed at least once.
RepeatStatement = REPEAT StatementSequence UNTIL expression.
REPEAT k := i MOD j; i := j; j := k; UNTIL j = 0