Cod sursa(job #613032)
| Utilizator |  Cristiana Sandru cristianas |
Data | 14 septembrie 2011 23:22:07 |
|---|---|---|---|
| Problema | A+B | Scor | 0 |
| Compilator | fpc | Status | done |
| Runda | test_info20 | Marime | 0.22 kb |
program suma;
var a,b,s:byte;
f:text;
begin
assign(f,'adunare.in');
reset(f);
write('a=');
readln(f,a);
write('b=');
readln(f,b);
close(f);
assign(f,'adunare.out');
rewrite(f);
s:=a+b;
writeln(f,s);
end.
