Cod sursa(job #543879)

Utilizator catalin.stStanciu Catalin catalin.st Data 28 februarie 2011 18:11:19
Problema A+B Scor 100
Compilator fpc Status done
Runda Arhiva de probleme Marime 0.18 kb
var a,b,C:longint;
f,g:text;
begin
assign(f,'adunare.in');ASSIGN(G,'adunare.out');RESET(F);REWRITE(G);
READLN(F,A);
READLN(F,B);
C:=A+B;
WRITE(G,C);
CLOSE(F);
CLOSE(G);
end.