[PASCAL] problema con for e array

[Seso7]

ciao a tutti.
ho un problema con turbo pascal... sto realizzando un piccolo programmino e sto facendo uso di un for perchè con questo programma devo:
_inserire da tastiera un numero di valori che dovrò inseire,
_inserire n (appena deciso) valori da tastiera,
_fare la media dei valori inseriti e restituirla in output... avevo pensato di realizzarlo con un for e con un array mettendo:

for n:=1 to x do begin
writeln('Inserisci il valore');
readln(risultato[n]);
{risultato è un array definito inizialmente con risultato:array[1..999] of real}
end;

a questo punto mi è sorto un errore di compilazione in readln(risultato[n]); che mi chiede di inserire una partentesi chiusa dove sta la parentesi chiusa (in pratica c'è ma è come se lui non la sentisse).
poi avevo un altro dubbio cioè sul come fare per sommare tutti i n risultati ottenuti... cioè in pratica a me verrebbero tante variabili così: risultato[1], risultato[2], ecc ma come faccio per fargli fare la somma tra tutti i risultato[n]??
in pratica: come mi consigliate di fare questo programma?

[mondobimbi]

sembrerebbe giusto, prova a fare un paste di questo (che ho compilato con fpc

program prova;

var
  risultato : array[1 .. 999] of real;
  n, x : integer;
  sum : real;
  
begin
x := 4;
sum := 0;

for n:=1 to x do begin
writeln('Inserisci il valore');
readln(risultato[n]);
sum := sum + risultato[n];
{risultato è un array definito inizialmente con risultato:array[1..999] of real}
end;
writeln(sum);
end. 

ciao
sergio

[Seso7]

grazie mille a tutti ho risolto da solo!! grazie mille lo stesso..