Cod sursa(job #369927)

Utilizator laurentiuuCindea Laurentiu Bogdan laurentiuu Data 29 noiembrie 2009 19:42:12
Problema A+B Scor 100
Compilator fpc Status done
Runda Arhiva de probleme Marime 0.25 kb
program suma;
var a,b,s:longint;
    f,g:text;
begin
        assign(f,'adunare.in');         reset(f);
        assign(g,'adunare.out');        rewrite(g);
        read(f,a,b);
        s:=a+b;
        write(g,s);
        close(f);       close(g);
end.