Цикл з передумовою в Паскалі