Составит программу, которая вычисляет сумму первых n(ввести с клавиатуры) четных ч

// PascalABC.NET 3.2, сборка 1325 от 19.10.2016 begin   var n:=ReadInteger('n=');   Writeln('s=',2.Step(2).Take(n).Sum) end. Пример n= 5 s=30