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

11 lines
176 B
Text

$ include "seed7_05.s7i";
const proc: main is func
local
var integer: a is 0;
var integer: b is 0;
begin
read(a);
read(b);
writeln(a + b);
end func;