tengo un problema con este programa, me da un error que dice "ordinal expression expected" y no se como arreglarlo

PROGRAM EJ23 (INPUT, OUTPUT);
VAR
ns,cont,n,cont2:integer;
acum,i,e,acum2,ic:real;
f,m,sexo:char;

BEGIN
acum:=0;
acum2:=0;
cont:=0;
cont2:=0;
write ('ingrese la cantidad de socios del club: ');
readln (n);
for i:=1 to n do -------------------> (me marca esto el error)
begin
repeat
write ('ingrese sexo (m o f): ');
readln (sexo)
until (sexo='f') or (sexo='m');
write ('ingrese numero de socio: ');
readln (ns);
write ('ingrese edad: ');
readln (e);
write ('ingrese importe de la cuota: ');
readln (ic);
acum:=acum+e;
acum2:=acum2+ic;
if sexo='f'
then cont:=cont+1
else cont2:=cont2+1;
end;
writeln ('cantidad de mujeres: ',cont);
writeln ('cantidad de varones: ',cont2);
writeln ('promedio de edad de los socios: ',acum/n);
writeln ('total recaudado por el club en concepto de cuotas: ',acum2)
END.

Fijate si no es porque i es de tipo real. Poniendola como integer me compila.

siii, ahora sii, era esa boludes, GRACIAS

---

como hago para ponerle colores y editar todo eso? para q no me aparezcan los promedios en notacion cientifica y demas..

buenas tengo una duda con un programa de dev_pascal es cual dada una palabra separarla por silabas !!! necesito que me ayuden por fa es urgente ....