Cod sursa(job #2816)

Utilizator Adrian001Vladulescu Adrian Adrian001 Data 19 decembrie 2006 11:31:39
Problema A+B Scor 100
Compilator fpc Status done
Runda Arhiva de probleme Marime 0.2 kb
Raporteaza aceasta sursa 
Program cel;
var f,g:text;
    a,b,S:longint;
Begin
Assign(f,'adunare.in');Reset(f);
Assign(g,'adunare.out');Rewrite(g);
Readln(f,a);
Read(f,b);
S:=a+b;
Write(g,S);
close(f);
Close(g);
end.