Cod sursa(job #295377)

Utilizator DelmuI.D. Margarit Delmu Data 3 aprilie 2009 11:18:51
Problema A+B Scor 30
Compilator fpc Status done
Runda Arhiva de probleme Marime 0.25 kb
Raporteaza aceasta sursa 
var f,t:text;
    a,b:longint;
begin
assign(f,'adunare.in');
assign(t,'adunare.out');
reset(f);
read(f,a);read(f,b);
close(f);
rewrite(t);
if  ((a+b) mod 2 = 0) then write(t,a+b)
                           else write(t,b-a);
close(t);
end.