Cod sursa(job #108968)
Utilizator | Grigoroi Alexandru sandu2508 | Data | 24 noiembrie 2007 11:50:55 |
---|---|---|---|
Problema | A+B | Scor | 0 |
Compilator | fpc | Status | done |
Runda | Arhiva de probleme | Marime | 0.22 kb |
program adunare;
var
a, b: longint;
f: text;
begin
assign (f, 'adunare.in');
reset (f);
readln (A);
readln(b);
close (f);
b:= a+b;
assign (f, 'adunare.out');
rewrite(f);
writeln(f, b);
close(F);
end.