[Pascal] Problema con if...then...else

[Il Razziatore]

Salve a tutti,
da poco ho iniziato a studiare il Pascal.
Stavo facendo un prova usando if...then...else, ma mi dà questo problema:



sapete aiutarmi? Non capisco che vuol dire "expected but ELSE found
"

Grazie ciao

PS:
Non so se i writeln ('n1,' testo',n2) sono giusti, era una prova, asd.

[ilsensine]

Non ci va il ";" prima di else.

[Il Razziatore]

Argh, è vero
Che poi ho dimenticato pure il readln finale.

Vabbè, grazie mille

EDIT: già che ci sono: se io volessi fa ricominciare dall'inizio il programma senza doverlo riaprire come faccio?

[variabilepippo]

se io volessi fa ricominciare dall'inizio il programma senza doverlo riaprire come faccio?

Cosa significa?

[Il Razziatore]

Originariamente inviato da variabilepippo

Cosa significa?

Cioè una volta che viene stampato a video quello che deve essere stampato, chiedere (tramite un if) se voler rifare da capo con altri numeri o se chiudere.

[variabilepippo]

Program Ciclo1;

uses CRT;

const tastoESC = #27;

begin
 repeat
   // QUI METTI IL TUO CODICE
 until ReadKey = tastoESC; // Premi ESC per uscire al termine dell'esecuzione
end.

oppure

Program Ciclo2;

uses CRT;

var risposta : char;

{$APPTYPE CONSOLE}

begin
 repeat
   // QUI METTI IL TUO CODICE
   writeln('Vuoi uscire dal programma (S/N)?');
   risposta := ReadKey;
 until (risposta = 's') or (risposta = 'S');
end.