Cod sursa(job #1463005)
Utilizator | Data | 19 iulie 2015 16:34:48 | |
---|---|---|---|
Problema | A+B | Scor | 0 |
Compilator | fpc | Status | done |
Runda | Arhiva de probleme | Marime | 0.34 kb |
program adunare;
var a,b,S:longint;
adunin,adunout:text;
begin
assign(adunin,'adunare.in');reset(adunin);
assign(adunout,'adunare.out');rewrite(adunout);
readln(a,b);
S:=a+b;
if(S<=2000000000)then
writeln(adunout,S);
close(adunin);
close(adunout);
end.