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

• 1 раз.
• 0 раз.
• 4 раза.
• 2 раза.