Cod sursa(job #585536)
Utilizator | Data | 29 aprilie 2011 23:35:39 | |
---|---|---|---|
Problema | A+B | Scor | 100 |
Compilator | fpc | Status | done |
Runda | Arhiva de probleme | Marime | 0.2 kb |
Program AB;
var A,B,C:Longint;
f1,f2:text;
begin
assign(f1,'adunare.in'); reset(f1);
assign(f2,'adunare.out'); rewrite(f2);
readln(f1,A,B);
C:=A+B;
writeln(f2,C);
close(f1);close(f2);
end.