Question

Напишите програму для паскаля таким образом чтобы она складывала 7 квадратичных чисел с 1 и нечетные по возрастанию ( 1 3 5 ...)

Answer 1

===== PascalABC.NET =====

begin

 SeqGen(7, 1, i -> (i + 2))

     .Sum(p -> p * p)

     .Println

end.