Programozás Pascalban: Iterációk, repeat - until ciklus