===== PascalABC.NET =====
begin
var n := ReadInteger('n =');
SeqGen(n, 1, 1, (p, q) -> p + q).Print
end.
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
===== PascalABC.NET =====
begin
var n := ReadInteger('n =');
SeqGen(n, 1, 1, (p, q) -> p + q).Print
end.