Cod sursa(job #67828)
Utilizator | Data | 25 iunie 2007 17:42:05 | |
---|---|---|---|
Problema | A+B | Scor | 0 |
Compilator | fpc | Status | done |
Runda | Arhiva de probleme | Marime | 0.21 kb |
var a,b,c:longint;
var fin,fout:text;
begin
assign(fin, 'suma.in'); reset(fin);
assign(fout, 'suma.out'); rewrite(fout);
readln(fin, a);
readln(fin, b);
c:=a;
write(fout, c);
close(fin);
close(fout);
end.