Cod sursa(job #313067)

Utilizator butler1234Cioc Stefan butler1234 Data 7 mai 2009 21:46:17
Problema A+B Scor 100
Compilator fpc Status done
Runda go Marime 0.21 kb
program adunare;
var a,b,s:longint;
    f1,f2:text;
begin
assign(f1,'adunare.in'); reset(f1);
assign(f2,'adunare.out'); rewrite(f2);
readln(f1,a);
readln(f1,b);
s:=a+b;
write(f2,s);
close(f1);
close(f2);
end.