СРОЧНОПаскаль:Вычислить S=3+5+7+...(2n+1)

Question

СРОЧНО
Паскаль:
Вычислить S=3+5+7+...(2n+1)

Answer 1

Var
i,n:integer;
s:real;
begin
    readln(n);
          for i:=1 to n do
                 s:=s+(2*i+1);
          writeln(s)          ;
end.