Помогите создать проект в 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);
...
Вот так
Оцени ответ
Вход
Регистрация
Задать вопрос
Помогите создать проект в 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);
...
Вот так