[pascal] ridirigere output su file

[SwOrDoFmYdEsTiNy]

salve a tutti, ho un problema con un programma pascal, sto cercando di far funzionare la funzione (scusate il gioco di parole) assign, il frammento di codice è il seguente (naturalmente è solo una prova, il programma completo è ancora in fase di scrittura :D)

program scrivere_testo;

var

a, b : integer;

prova : text;

Begin
assign (prova, 'c:\casa\prova.txt');

writeln('inserisci il primo numero');
readln(a);
writeln('inserisci il secondo numero');
readln(b);
a := a + b;
writeln(a);
readln;
reset(prova);
rewrite (prova);
writeln (a, b);
close (prova);

writeln('scrittura sul testo terminato');
readln;

end.

purtroppo non viene visualizzato nessun risultato nel file di testo T_T
grazie mille a chiunque mi saprà aiutare

[SwOrDoFmYdEsTiNy]

sono riuscito a risolvere il problema che non mi scriveva sul file, adesso posto il codice, (si bhe lo so che è la somma di due numeri XD è la priam cosa che mi è venuta in mente per provare :eek: )


program scrivere_testo;

var

a, b, c : integer;

prova : text;

Begin
assign (prova, 'c:\casa\prova.txt');

writeln('inserisci il primo numero');
readln(a);
writeln('inserisci il secondo numero');
readln(b);
c := a + b;
writeln(c);
readln;
rewrite(prova);
writeln(prova, 'il primo addendo è: ',a,' il secondo addendo è: ', b,' il risultato è: ', c );
close (prova);

writeln('scrittura sul testo terminato');
readln;

end.


edit: ho anche capito come poter scrivere più volte sullo stesso file (sempre dallo stesso programma), ora mi servirebbe una mano per sapere come creare delle sequenze alfanumeriche (diciamo che mi interessa usare tutti i caratteri della tabella ascii normale), partendo da 'a' fino ad '999999999' e poi poterli salvare su il file (che già riesco a fare), c'è qualche funzione che permette di creare delle stringhe casuali?