Question

Помогите создать проект в Delphi 7
Составьте программу вычисления суммы:
S = 1 +3 +5 +7 +…+(2*N +1)..

 

 

Answer 1

Пишу только фрагмент.
...

Readln(N);

S:=1;

for i:=0 to N-1 do
S:=S+(2*i+1);
Writeln('Сумма равна ,'S);
...

 Вот так