RosettaCodeData/Task/A+B/Pascal/a+b-2.pascal
Ingy döt Net d066446780 langs a-z
2013-04-10 22:43:41 -07:00

10 lines
168 B
Text

var
a, b: integer;
begin
reset(input, 'input.txt');
rewrite(output, 'output.txt');
readln(a, b);
writeln(a + b);
close(input);
close(output);
end.