Cod sursa(job #1440668)

Utilizator agretinamucea agretina agretina Data 23 mai 2015 13:42:48
Problema A+B Scor 100
Compilator fpc Status done
Runda Arhiva de probleme Marime 0.23 kb
Raporteaza aceasta sursa 
program inf;
var a,b:longint;
    s:int64;
    f,g:Text;
begin
    assign (f,'adunare.in') ; reset (f);
    assign (g,'adunare.out'); rewrite (g) ;
    readln (f,a,b);
    s:=a+b;
    writeln (g,s);
    close (f); close (g);
end.