Cod sursa(job #14998)

Utilizator razvi_b0ssRazvan Pop razvi_b0ss Data 10 februarie 2007 15:16:22
Problema A+B Scor 100
Compilator fpc Status done
Runda Arhiva de probleme Marime 0.19 kb
var a,b:integer;
    fin,fout:text;
Begin
Assign(fin,'adunare.in');Reset(fin);
ReadLn(fin,a);
ReadLn(fin,b);
Assign(fout,'adunare.out');Rewrite(fout);
WriteLn(fout,a+b);
close(fout);
End.