Cod sursa(job #1265238)

Utilizator PetruZZatic Petru PetruZ Data 16 noiembrie 2014 22:24:17
Problema A+B Scor 100
Compilator fpc Status done
Runda Arhiva de probleme Marime 0.24 kb
Raporteaza aceasta sursa 
Program Adunare;
 var mi, mo : text;
     a, b, c : longint;
begin
 assign(mi,'adunare.in');
 assign(mo,'adunare.out');
 reset(mi);
 rewrite(mo);
 readln(mi,a);
 readln(mi,b);
 c:=a+b;
 write(mo,c);
 close(mi);
 close(mo);
end.