Какую последовательность чисел выводит на экран серия команд: a:=3 repeat writeln(a); a:=a+3; until a меньше 15;
Как-то так: 3, 6, 9, 12, 15
3 6 9 12 15 И все. Цикл прекратится.