за 3 задания
1)

Дана последовательность операторов :
а:=1;
b:=1;
repeat
a:= a+1;
b=b*3
until b<a;
СКОЛЬКО РАЗ БУДЕТ ПОВТОРЯТСЯ ЦИКЛ
2) В Результате выполнения фрагмента программы:
s:=0
n:=0
whlle n<5 do
begin
s:=s+2
n:=n+1
end
writeln ('s=',s)
Переменная s принимает значение
3) Определите, какое количество раз выполнится оператор цикла.
for X:= 10 to 12 do
Y = X*X
​

Представим, что мы считаем сами так, как компьютер:

1) а:=1; b:=1;

  выполняем программу: а:=а+1, т.е. а = 1+1 = 2; b:=1*3 =3 - это 1-й раз;

  проверяем условие b<a, т.е. 3 <2 - ложно, значит, больше данная последовательность операторов выполняться не будет.

ответ: 1 раз.

2) s:=0 ; n:=0;

   проверяем условие n<5, т.е. 0<5 - верно, значит теперь s:=s+2 =0+2=2, n:=n+1=0+1=1 - 1-й раз;

   проверяем условие n<5, т.е. 1<5 - верно, значит теперь s:=s+2 =2+2=4, n:=n+1=1+1=2 - 2-й раз;

   проверяем условие n<5, т.е. 2<5 - верно, значит теперь s:=s+2 =4+2=6, n:=n+1=2+1=3 - 3-й раз;

   проверяем условие n<5, т.е. 3<5 - верно, значит теперь s:=s+2 =6+2=8, n:=n+1=3+1=4 - 4-й раз;

   проверяем условие n<5, т.е. 4<5 - верно, значит теперь s:=s+2 =8+2=10, n:=n+1=4+1=5 - 5-й раз;

    проверяем условие n<5, т.е. 5<5 - ложно, значит выполнения фрагмента программы больше не будет.

ответ: 5 раз.

3) оператор цикла будет выполнен для х=10, х=11 и х=12, т.е. 3 раза.

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