Cod sursa(job #272653)

Utilizator chimistuFMI Stirb Andrei chimistu Data 7 martie 2009 16:47:24
Problema A+B Scor 100
Compilator fpc Status done
Runda Arhiva de probleme Marime 0.24 kb
Raporteaza aceasta sursa 
var a,b,c:longint;
    f,g:text;
begin
     assign (f,'adunare.in');
     assign (g,'adunare.out');
     reset (f);
     readln (f,a);readln(f,b);
     close (f);
     c:=a+b;
     rewrite (g);
     write (g,c);
     close (g);
end.