--- PascalABC.NET 3.6.2 ---
begin
var NumSeq := SeqGen(ReadInteger(), 1, 1, (cur, prev) -> cur + prev);
var Output := OpenWrite('output.txt');
Write(Output, NumSeq.JoinToString(' '));
Output.Close();
end.
--- PascalABC.NET 3.6.2 ---
begin
var NumSeq := SeqGen(ReadInteger(), 1, 1, (cur, prev) -> cur + prev);
var Output := OpenWrite('output.txt');
Write(Output, NumSeq.JoinToString(' '));
Output.Close();
end.