Сколько раз будет выполнен цикл "до" в фрагменте программы? a: =1; repeat a: =a*2; until a> =16

5 раз будет выполнен

ответ: 4 раза.

a = 1 повторять a = a * 2 прекращать когда a >= 16
a = 1 * 2 = 2 ( 2 >= 16 - нет, продолжаем)
a = 2 * 2 = 4 (4 >= 16 - нет, продолжаем)
a = 4 * 2 = 8 (8 >= 16 - нет, продолжаем)
a = 8 * 2 = 16 (16 >= 16 - да, прекращаем)