Cod sursa(job #94256)

Utilizator unsilviuContvechidontdeactivatepls unsilviu Data 22 octombrie 2007 15:39:58
Problema A+B Scor 100
Compilator fpc Status done
Runda Arhiva de probleme Marime 0.19 kb
var a,b,s:longint;
    f,g:text;
 begin
 assign (f, 'adunare.in');reset(f);
 assign (g, 'adunare.out');rewrite(g);
 read (f,a);
 read(f,b);
 s:=a+b;
 write(g,s);
 close(f);close(g);
 end.