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

0 голосов

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


спросил от (26 баллов) в категории Информатика
1 Ответ
0 голосов
ответил от (46 баллов)

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

Readln(N);

S:=1;

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

 Вот так

...