Cod sursa(job #19213)

Utilizator fluffyDan-Leonard Crestez fluffy Data 18 februarie 2007 22:10:14
Problema Buline Scor 0
Compilator fpc Status done
Runda Arhiva de probleme Marime 0.29 kb
Raporteaza aceasta sursa 
program pas;

var fin, fout: text;
    a, b, s: integer;

begin
    assign(fin, 'adunare.in'); reset(fin);
    assign(fout, 'adunare.out'); rewrite(fout);
    
    readln(fin, a);
    readln(fin, b);
    s := a + b;

    write(fout, s);

    close(fin);
    close(fout);
end.