Cod sursa(job #459831)

Utilizator hunter_ionutzzzFarcas Ionut hunter_ionutzzz Data 31 mai 2010 12:39:33
Problema A+B Scor 0
Compilator fpc Status done
Runda Arhiva de probleme Marime 0.24 kb
program suma;
var a,b:longint;
    fin,fout:text;
begin
    assign(Fin,'ADUNARE.IN'); reset(fin);
    assign(fout,'adunare.out'); rewrite(fout);
    read(fin,a,b);
    a:= a + b;
    writeln(fout,a);
    close(fin);
    close(fout);
end.