Vorrei fare un programmino che fa i seguenti compiti:
-viene chiesta un'addizione di numeri casuali
-se questa è giusta viene incrementata una variabile, stampata a video

io pensavo a qualcosa del genere
codice:
PROGRAM pr;
USES crt;
VAR x1,y1,res,somma,b,b2:integer;
VAR a:text;
begin
     clrscr;
     randomize;
     textcolor(3);
     x1:=random(1000);
     y1:=random(1000);
     writeln('Quanto fa ', x1, ' + ', y1, ' ???');
     readln(res);
     somma:=x1 + y1;
     IF (res=somma) THEN
                  BEGIN
                  assign(a, 'C:\Programmi\Pascal\Ex\ciao.txt');
                  append(a);
                  reset(a);
                  read(a,b);
                  b2:= b+1;                         ]
                  write(a, b);
                  close(a);
                  END;
end.
premetto di non conoscere benissimo il pascal