Cod sursa(job #613483)
Utilizator | Data | 27 septembrie 2011 18:39:38 | |
---|---|---|---|
Problema | A+B | Scor | 100 |
Compilator | fpc | Status | done |
Runda | Arhiva de probleme | Marime | 0.19 kb |
Var a,b:longint;
f,t:text;
begin
assign(f,'adunare.in');
reset(f);
read(f,a);
readln(f);
read(f,b);
close(f);
assign(t,'adunare.out');
rewrite(t);
write(t,a+b);
close(t);
end.