1+3+5+...+(2n-1) Помогите решить в Pascal

1+3+5+...+(2n-1) Помогите решить в Pascal
Гость
Ответ(ы) на вопрос:
Гость
program gt; var n,i,s:longint; begin readln(n); s:=0; for i:=1 to n do s:=s+2*i-1; writeln(s); end.
Не нашли ответ?
Ответить на вопрос
Похожие вопросы