Аналитическое выражение члена ряда, QBASIC Опции

[Ozzя]

Составить программу вычисления суммы и элемента числового ряда для известного числа членов ряда N.
Y=(-2+1/80)+(4-2/40)+(-8+3/20)+(16-4/10)+...
Для заданного члена ряда указать также аналитическое выражение.

Что-то непонятна вот эта часть - аналитическое выражение

Есть какие-то мысли по этому поводу?

Код

CLS
x = 160
INPUT " Введите n: "; n
sum = 0
FOR i = 1 TO n
  x = x / 2
  a = (-1) ^ i * 2 ^ i + ((-1) ^ (i + 1) * ((i + 1) - 1)) / x
  sum = sum + a
NEXT i
PRINT "Сумма "; n; " членов ряда = "; sum
PRINT n; "-й член ряда = "; a

Надеюсь, это имелось ввиду?

Код

CLS
x = 160
INPUT " Введите n: "; n
sum = 0
FOR i = 1 TO n
  x = x / 2
  a1 = (-1) ^ i * 2 ^ i
  s1$ = STR$(a1)
  a2 = ((-1) ^ (i + 1) * ((i + 1) - 1))
  a = a1 + a2 / x
  s2$ = STR$(a2)
  sum = sum + a
NEXT i
PRINT "Сумма "; n; " членов ряда = "; sum
PRINT n; "-й член ряда = "; a
PRINT "Аналитическое выражение для "; n; "-го члена ряда равно:"
PRINT s1$ + "+(" + s2$ + "/" + STR$(x) + ")"

Сообщение отредактировано: Ozzя - 24.04.2006 12:15

[Lapp]

Что-то непонятна вот эта часть - аналитическое выражение

Я думаю, что имеется в виду выражение n-ного члена ряда через n. То есть то, что ты написал в программе:

x = x / 2
a = (-1) ^ i * 2 ^ i + ((-1) ^ (i + 1) * ((i + 1) - 1)) / x

Только выраженное в "цивильном" виде. Ну и с использованием степени x, а не последовательного умножения. Как я понимаю, его надо только "указать", а не вывести на печать. То есть типа приложить к проге.

[Ozzя]

Да, спасибо. Так и есть.