Cod sursa(job #1037022)

Utilizator Alex1199Alex Bercea Alex1199 Data 19 noiembrie 2013 20:22:58
Problema A+B Scor 100
Compilator fpc Status done
Runda Arhiva de probleme Marime 0.28 kb
Raporteaza aceasta sursa 
Program Adun;  Uses Crt;
 Var A, B : Integer;
        C : Longint;
        F, G : text;
Begin    
   Assign(G,'adunare.in');
     Reset(g);
     Readln(G, a, b);
   Close(G);
  C:=A+b;
  Assign(F,'adunare.out');
   Rewrite(F);
     Write(F,C);
  Close(F);
 Readkey;
End.