Pascal - programma calcolatrice...mi segnala un errore

il codice è questo:

program calcolatrice;
uses crt;
var a,b,scelta,ris:integer;

begin
writeln('Inserisci il primo numero: ');
readln(a);
writeln('Inserisci il secondo numero: ');
readln(b);
writeln('Quale operazione vuoi svolgere? 1. add, 2. sott, 3. molt, 4. div ');
readln(scelta);

case scelta of
            1: begin
             ris:=a+b;
             write('Il risultato e'' ',ris);
             end;
             2: begin
             ris:=a-b;
             write('Il risultato e'' ',ris);
             end;
             3: begin
             ris:=a*b;
             write('Il risultato e'' ',ris);
             end;
             4: begin
             ris:=a/b;
             write('Il risultato e'' ',ris);
             end
                  readln
                    end.

uso Dev-Pascal, quando la vado a compilare mi segnala l'ultimo readln, quello prima dell'ultimo end, dov'è che ho sbagliato?

Ciao!
Ho letto il tuo sorgente, e ho notato ceh manca l' end che chiode il case of.
Inoltre, se intendi calcolare la divisione, la variabile ris deve essere dichiarata real.

Ecco il programma corretto:

program calcolatrice; 
uses crt; 
var a,b,scelta:integer;
    ris:real;

begin 
writeln('Inserisci il primo numero: '); 
readln(a); 
writeln('Inserisci il secondo numero: '); 
readln(b); 
writeln('Quale operazione vuoi svolgere? 1. add, 2. sott, 3. molt, 4. div '); 
readln(scelta); 

case scelta of 
            1: begin 
             ris:=a+b; 
             write('Il risultato e'' ',ris:6:2);
             end; 
             2: begin 
             ris:=a-b; 
             write('Il risultato e'' ',ris:6:2);
             end; 
             3: begin 
             ris:=a*b; 
             write('Il risultato e'' ',ris:6:2);
             end; 
             4: begin 
             ris:=a/b; 
             write('Il risultato e'' ',ris:6:2);
             end;
       end;
                  readln;
end.

grazie mille adesso funziona

Di nulla!