Перечислите те значения, которые будет принимать переменная цикла в данном фрагменте программы.

program d;

var a, b, c: integer;

begin

 for c:= 1 to 5 do

 begin

  a:= a+ 1;

  b:= b- 1;

 end;

end.