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

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

Readln(N);

S:=1;

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

 Вот так

Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!

Загрузить картинку