Программирование циклов в языке Pascal

Сколько раз будет выполнено тело цикла в следующем фрагменте программы?

for i:=-1 to 1 do s:=s+1;

Чему будет равно значение целой переменной a после выполнения этого фрагмента программы?

a:=2;
for i:=0 to 2 do a:=a+i;

Определите значение переменной a после выполнения следующего фрагмента программы:

a:=1;
for b:=1 to 5 do a:=a*b;

Сколько раз будет выполнено тело цикла в следующем фрагменте программы?

a:=1;
b:=2;
while a+b < 8 do
begin
  a:=a+1;
  b:=b+2;
end;

Сколько раз будет выполнено тело цикла в следующем фрагменте программы?

a:=1;
b:=2;
while a+b > 2 do
begin
  a:=a+1;
  b:=b+2;
end;

Сколько раз будет выполнено тело цикла в следующем фрагменте программы?

a:=2;
b:=3;
while a+b < 5 do
begin
  a:=a+1;
  b:=b+2;
end;

Какое число нужно написать вместо многоточия, чтобы цикл выполнился ровно 3 раза?

i:=2;
while i<=... do begin
  writeln ('Привет!');
  i:=i+1;
end;

Какое число нужно написать вместо многоточия, чтобы цикл выполнился ровно 2 раза?

i:=...;
while i>=3 do begin
  writeln ('Привет!');
  i:=i-1;
end;

Определите значение переменной b после выполнения следующего фрагмента программы:

a:=2;
b:=0;
while a<7 do
begin
  a:=a+1;
  b:=b+a;
end;

Определите значение переменной s после выполнения следующего фрагмента программы:

a:=23;
s:=0;
while a>0 do
begin
  s := s + a mod 10;
  a := a div 10;
end;