Сколько раз выполнится цикл в фрагменте данной программы? a:=1; b:=1; while a+b<8 do begin a:=a+1; b:=b+2 end;

Для того чтобы определить, сколько раз выполнится цикл в данном фрагменте программы, нужно проанализировать условие цикла.

У вас две переменные, a и b, которые инициализированы значением 1. Цикл будет выполняться до тех пор, пока сумма a и b не будет больше или равна 8.

Таким образом, давайте посмотрим на каждую итерацию цикла:

1. a=1, b=1, сумма a и b = 2, цикл продолжается.
2. a=2, b=3, сумма a и b = 5, цикл продолжается.
3. a=3, b=5, сумма a и b = 8, цикл заканчивается.

Таким образом, цикл выполнится 3 раза в данном фрагменте программы.