tengo un problema con el comando VAL

[perudelphi]

tengo otro problema

'a' es un cadena

long:length(a);
for n:= 1 to (long/2) do


si a 'n' la declaro como byte sale de error:
[Error] letraspares.dpr(20): Incompatible types: 'Byte' and 'Extended'


si a 'n' la declaro como integer sale de error:
[Error] letraspares.dpr(20): Incompatible types: 'Integer' and 'Extended'


si a 'n' la declaro como real sale de error:

[Error] letraspares.dpr(20): Incompatible types: 'Integer' and 'Extended'

[perudelphi]

el ultimo error estaba mal


[Error] letraspares.dpr(20): For loop control variable must have ordinal type

entonces que hacer

for n:= 1 to (long/2) do
for s:= (2*n) to long do
write(' ',nombre[s],' ');

con este codigo lo ke quiero es escribir las letras pares de una cadena
nombre es un vector que tiene 20 espacios (max de caracteres) y en cada espacio del vector esta una letra de la cadena
pero el problema es la 'n' dado que no puedo poner byte no integer pues long esta dividido pero tampoco puede ser real por ke dice que un loop debe ser un numero ordinal ¿que hacer?