Cod sursa(job #504281)
Utilizator | Data | 27 noiembrie 2010 12:40:30 | |
---|---|---|---|
Problema | A+B | Scor | 0 |
Compilator | fpc | Status | done |
Runda | Arhiva de probleme | Marime | 0.26 kb |
program suma;
var a,b,s:integer;
input,output:text;
begin
assign(input,'suma.in');
reset(input);
assign(output,'suma.out');
rewrite(output);
readln(input,a);
readln(input,b);
s:=a+b;
write(output,s);
close(input);
close(output);
end.