Cod sursa(job #52965)

Utilizator Pepelea_FlaviuFlaviu Pepelea Pepelea_Flaviu Data 20 aprilie 2007 14:06:12
Problema A+B Scor 100
Compilator fpc Status done
Runda Arhiva de probleme Marime 0.21 kb
var a,b,c:longint;
    fi,fo:text;
begin
     assign(fi,'adunare.in'); reset(fi);
     assign(fo,'adunare.out'); rewrite(fo);
     readln(fi,a,b);
     c:=a+b;
     writeln(fo,c);
     close(fi); close(fo);
end.