Cod sursa(job #437979)

Utilizator HALFKNOTLiviu Pirvan HALFKNOT Data 10 aprilie 2010 12:56:30
Problema A+B Scor 100
Compilator fpc Status done
Runda Arhiva de probleme Marime 0.19 kb
var a,b:longint;
    f:text;
begin
assign(f,'adunare.in'); reset(f);
readln (f,a);
read (f,b);
a:=a+b;
close(f);
assign (f,'adunare.out'); rewrite(f);
write (f,a);
close(f);
end.