var i,n:integer; a,s:real; begin write('n = '); readln(n); s:=24; for i:=1 to n-1 do begin a:=(2*i-1)*(2*i)/(4*i); s:=s a; end; writeln('s = ',s); end.
Пример: n = 5 s = 36.5
более месяца назад
Ваш ответ:
Вы можете из нескольких рисунков создать анимацию (или целый мультфильм!). Для этого нарисуйте несколько последовательных кадров
и нажмите кнопку Просмотр анимации.