Помогите создать проект в Delphi 7

Составьте программу вычисления суммы:

S = 1 + 3 + 5 + 7 + ... + (2*N + 1) ...

Question

Рона

9 мая, 12:40

+4

Ответы (1)

Знаешь ответ?

Мишаня · Answer 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) ...