Cod sursa(job #459831)
Utilizator | 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.