[PASCAL] Errore di sintassi nell'istruzione else

[Tonino9191]

So studiando da 4-5 giorni il pascal ma mi sono bloccato in un esercizio ecco il codice:

(*intestazione del programma*)
program museo;

(*parte dichiarativa*)
uses
newdelay , crt;

var
visitatori, somma_eta: integer;
eta_media: real;
risposta: char; (* S oppure N per SI/NO*)
eta: integer;
Errore: integer;
etaS: string;

(*parte esecutiva*)
begin
  clrscr; (*cancella schermo*)

  visitatori:=0;
  eta:=0;
  somma_eta:=0;
  eta_media:=0;


  repeat
    visitatori:= visitatori + 1;

  repeat
    writeln ('Inserire l''eta'' del visitatore n. ', visitatori);
    readln(etaS);

    val (etaS, eta, errore);
    if errore <>0 then
      writeln('Errore! Inserire un numero in cifre');
    else
      if eta<0 then
      writeln('Errore! Inserire un valore maggiore od uguale a zero')
  until eta >=0;
    somma_eta := somma_eta + eta;
    eta_media := somma_eta / visitatori;

    writeln ('eta''media attuale: ',eta_media:4:2);

    writeln('ci sono altri visitatori da inserire ? (S/N)');
    readln (risposta);
    until risposta= 'N';

    writeln('Premi INVIO per continuare...');
    readln;
end.

mi da error in statement dove ce else perche?? non posso trovare vie alternative perche e un esercizio e devo capirlo.

[alka]

Originariamente inviato da Tonino9191
So studiando da 4-5 giorni il pascal ma mi sono bloccato in un esercizio ecco il codice:

Per favore, usa il tag [CODE] al posto di [PHP] e manda a capo il codice ad ogni singola riga, così non diventiamo matti a comprendere il codice che hai scritto e l'origine dell'errore.

[Tonino9191]

Originariamente inviato da alka
Per favore, usa il tag [CODE] al posto di [PHP] e manda a capo il codice ad ogni singola riga, così non diventiamo matti a comprendere il codice che hai scritto e l'origine dell'errore.

ecco lo stavo per fare ma mi hai anticipato di un secondo

[alka]

Originariamente inviato da Tonino9191
mi da error in statement dove ce else perche??

Hai messo un carattere ";" di troppo nell'istruzione che precede l'else.

[Tonino9191]

sto guardando ma non lo vedo puoi dirmi la riga esatta?

edit:
credo di aver capito grazie

[mondobimbi]

il pascal non vuole il punto e virgola dopo la condizione if, se questa è seguita da else .