Cod sursa(job #606952)

Utilizator CrystalViorel Crystal Data 10 august 2011 15:22:16
Problema A+B Scor 100
Compilator fpc Status done
Runda Arhiva de probleme Marime 0.23 kb
program adunare;
var fin,fout: text;
    a,b,suma:int64;
begin
assign(fin, 'adunare.in');
reset(fin);
read(fin, a,b);
close(fin);
suma:=a+b;
assign(fout,'adunare.out');
rewrite(fout);
writeln(fout, suma);
close(fout);
end.