Pascal/Turbo Pascal - consulta

hola:
Para hacer la suma de los numeros entre 1000 y 1100 puedo hacer un
var i:integer;
suma:real;
begin
suma:=0
for i :=1000 to 1100 do
suma:=suma +1

y una duda ¿cual es el valor de la variable i al finalizar la ejecución de la estructura for de este programa??

programa uno;
type
valor= 1000..1100;
var i: valor;
suma:real;
begin
suma:=0
for i:= 1100 downto 1000 do
suma:=suma +i;
readln;
writeln("Suma: " suma:6:2);
end

No sé en qué consiste tu pregunta en el primer caso pero creo que el código que has escrito no cumple con el enunciado, para mi sería:

var i:integer;
suma:longint;
begin
suma:=0
for i :=1000 to 1100 do
suma:=suma + i;

Para la segunda cuestión la respuesta es 1000.