Cod sursa(job #2288280)

Utilizator MIGAAndrei Miga MIGA Data 23 noiembrie 2018 00:05:49
Problema A+B Scor 0
Compilator fpc Status done
Runda Arhiva de probleme Marime 0.28 kb
Raporteaza aceasta sursa 
program Adunare;

uses sysutils;

var
	a, b: integer;
	fin: file of integer;
	fout: TextFile;

begin
	assign(fin, 'adunare.in');
	reset(fin);
	read(fin, a);
	read(fin, b);
	close(fin);
	assign(fout, 'adunare.out');
	rewrite(fout);
	write(fout, a + b);
	close(fout);
end.