Foarte interesant , practic pe baza catorva exemple trebuie sa deduci o formula sau un termen general care se verifica pentru orice valoare a lui n 

da ai dreptate am modificat si a mers, orikm nu inteleg ce legatura are reset(f) cu eroarea

code:
1. program ss;
2. var a,b:integer;
3. f:text;
4. begin
5.   assign(f,'adunare.in'); reset(f);
6.   readln(f,a);
7.   readln(f,b);
8.   close(f);
9.   assign(f,'adunare.out'); reset(f); rewrite(f);
10. writeln(f,a+b);
11. close(f);
12.end.
stie cineva de ce imi da eroarea 'none 0 exit status' la codul pascal de mai sus?(oare trebuie un echivalent lui 'return 0' din c++ in pascal ?!).