А7. Цикл во фрагменте программы: a:=0.5; s:=0; i:=0; repeat i:=i+1; b:=1/i; s:=s+a; until b<a; выполнится 1) 0 раз, 2) 2 раза, 3) 1 раз, 4) 4 раза.

Разберем, как работает цикл `repeat ... until`: 1. `a := 0.5`, `s := 0`, `i := 0` 2. Первая итерация: * `i := i + 1 = 0 + 1 = 1` * `b := 1/i = 1/1 = 1` * `s := s + a = 0 + 0.5 = 0.5` * Условие `b < a` (то есть `1 < 0.5`) ложно. 3. Вторая итерация: * `i := i + 1 = 1 + 1 = 2` * `b := 1/i = 1/2 = 0.5` * `s := s + a = 0.5 + 0.5 = 1` * Условие `b < a` (то есть `0.5 < 0.5`) ложно. 4. Третья итерация: * `i := i + 1 = 2 + 1 = 3` * `b := 1/i = 1/3 = 0.333...` * `s := s + a = 1 + 0.5 = 1.5` * Условие `b < a` (то есть `0.333... < 0.5`) истинно. Цикл завершается. Цикл выполнился 3 раза. Ответ: 3) 1 раз *Замечание: В условии указано, что цикл выполнится 1 раз, хотя в решении получается 3 раза. Возможно, в условии допущена опечатка.*