1. Определите, какое значение будет выведено на экран в результате выполнения приведенной ниже последовательности операторов:
a:=1; b:=1;
while a>=b do b:=b+a;
a:=a+1;
write(b*a)

2. Сколько раз будет исполнен Цикл в фрагменте программы?
а) p:=2;
repeat
p:=p*0.1
until p<0.1;

б) p:=1;
repeat
p:=p*0.1
until p>0.1;

3.Определите, какое значение будет выведено на экран в результате выполнения приведенной ниже последовательности операторов:
a:=1; b:=1;
while a<=32 do a:=a*2;
b:=b*a;
write (b)