Cod sursa(job #362838)
| Utilizator |  iSeLast iSeLast |
Data | 11 noiembrie 2009 09:56:03 |
|---|---|---|---|
| Problema | A+B | Scor | 100 |
| Compilator | fpc | Status | done |
| Runda | Arhiva de probleme | Marime | 0.31 kb |
type suma=-maxlongint..2000000000;
var s:suma;
a,b:longint;
fin,fout:text;
begin
assign(fin,'adunare.in');
reset(fin);
assign(fout,'adunare.out');
rewrite(fout);
readln(fin,a);
readln(fin,b);
if (a+b<=2000000000) then s:=a+b else
s:=2000000000;
write(fout,s);
close(fin);
close(fout);
end.
