Cod sursa(job #248847)

Utilizator butler1234Cioc Stefan butler1234 Data 26 ianuarie 2009 22:03:08
Problema A+B Scor 100
Compilator fpc Status done
Runda Arhiva de probleme Marime 0.21 kb
program adunare;
var a,b,s:longint;
    f1,f2:text;
begin
assign(f1,'adunare.in'); reset(f1);
assign(f2,'adunare.out'); rewrite(f2);
readln(f1,a);
readln(f1,b);
s:=a+b;
write(f2,s);
close(f1);
close(f2);
end.