Cod sursa(job #509500)

Utilizator iulian131Moldovan Iulian iulian131 Data 11 decembrie 2010 11:13:52
Problema A+B Scor 100
Compilator fpc Status done
Runda Arhiva de probleme Marime 0.31 kb
Raporteaza aceasta sursa 
var a,b:longint;f:text;
begin
     assign(f,'adunare.in');
     reset(f);
     readln(f,a);
     readln(f,b);
     assign(f,'adunare.out');
     rewrite(f);
     if a+b > 2000000000 then
        write('Numarul depaseste 2000000000')
     else
        writeln(f,a+b);
     close(f);
     readln;
end.