Cod sursa(job #1198001)

Utilizator cutu12stefan Neacsu cutu12 Data 14 iunie 2014 12:00:22
Problema A+B Scor 0
Compilator fpc Status done
Runda Arhiva de probleme Marime 0.18 kb
var a,b,r:word;
    f,g:text;
begin
assign(f,'adunare.in'); reset(f);
assign(g,'adunare.out');rewrite(g);
readln(f,a);
read(f,b);
s:=a+b;
write(g,s);
close(f);close(g);
end.