Cod sursa(job #507798)
| Utilizator |  Iulian iu.ciocoiu |
Data | 6 decembrie 2010 20:13:38 |
|---|---|---|---|
| Problema | A+B | Scor | 100 |
| Compilator | fpc | Status | done |
| Runda | Arhiva de probleme | Marime | 0.21 kb |
program suma;
var a,b,c:integer;
f,g:text;
begin
assign (f,'adunare.in'); reset (f);
assign (g,'adunare.out'); rewrite (g);
readln (f,a);
readln (f,b);
c:=a+b;
writeln (g,c);
close (f);
close (g);
end.