===== PascalABC.NET =====
begin
SeqGen(ReadInteger, p -> p * p, 1).Sum.Print
end.
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
===== PascalABC.NET =====
begin
SeqGen(ReadInteger, p -> p * p, 1).Sum.Print
end.