Cod sursa(job #585536)

Utilizator SpiritGanea Dinu Spirit Data 29 aprilie 2011 23:35:39
Problema A+B Scor 100
Compilator fpc Status done
Runda Arhiva de probleme Marime 0.2 kb
Program AB;
var A,B,C:Longint;
    f1,f2:text;
begin
assign(f1,'adunare.in'); reset(f1);
assign(f2,'adunare.out'); rewrite(f2);
readln(f1,A,B);
C:=A+B;
writeln(f2,C);
close(f1);close(f2);
end.