программа нахождения суммы нечётных чисел S= 1+3+5+7+...+2*N-1 Паскаль

Ответ:

begin

 var n := ReadInteger();

 var sum := 0;

 for var i := 1 to n do

   if i mod 2 = 1 then

     sum += i;

 Write(sum)

end.

Объяснение:

PascalABC.NET