Cod sursa(job #605495)

Utilizator CrystalViorel Crystal Data 29 iulie 2011 16:37:26
Problema A+B Scor 0
Compilator fpc Status done
Runda Arhiva de probleme Marime 0.22 kb
program ab;
var fin,fout: text;
    a,b,suma:int64;

begin
assign(fin, 'a+b.in');
reset(fin);
read(fin, a,b);
close(fin);

suma:=a+b;

assign(fout,'a+b.out');
rewrite(fout);
writeln(fout, suma);
close(fout);
end.