Для х изменяющегося от a до b с шагом (b-a)/k, где (k=10), вычислить функцию f(x) - QBasic

Формулировка задачи:

Доброго времени суток! Я студентик и и информатику даже не планировал извучать а тут дали, помогите кто может! картинка с заданием вложена, заранее спасибо! Для х изменяющегося от a до b с шагом (b-a)/k, где (k=10), вычислить функцию f(x), используя ее разложение в степенной ряд в двух случаях: а) для заданного n; б) для заданной точности

(

=0.0001). Для сравнения найти точное значение функции. Алгоритм решения задачи сводится к трем циклам. Внешний цикл организует изменение параметра х. Внутренние циклы суммируют слагаемые при фиксированном параметре x, один (арифметический для заданного n), другой (итерационный для заданной точности . Следует обратить внимание на правильный выбор формулы для вычисления элемента ряда an и правильное присвоение начальных значений переменным цикла. Результаты расчетов должны быть выведены на экран следующим образом: Вычисление функции X= SN= SE= Y= X= SN= SE= Y= X= SN= SE= Y= Здесь X- значение параметра ; SN- значение суммы для заданного n; SE- значение суммы для заданной точности; Y-точное значение функции. __________________________ Помогите кто может пожалуйста, срочно надо

Решение задачи: «Для х изменяющегося от a до b с шагом (b-a)/k, где (k=10), вычислить функцию f(x)»

textual
                            Листинг программы 
                        

                            CLS
CONST eps = .0001
 
FOR x = .1 TO 1.05 STEP .1
   LOCATE 10 * x, 1
   PRINT USING "X = #.#"; x
 
   s = 1
   a = 1
   FOR i = 1 TO 10
      a = a * LOG(3) * x / i
      s = s + a
   NEXT i
   LOCATE 10 * x, 11
   PRINT USING "SN = #.####"; s
  
   s = 1
   a = 1
   i = 0
   DO
      i = i + 1
      a = a * LOG(3) * x / i
      s = s + a
   LOOP UNTIL a < eps
   LOCATE 10 * x, 25
   PRINT USING "SE = #.####"; s
 
   LOCATE 10 * x, 39
   PRINT USING "Y = #.####"; 3 ^ x
NEXT x
END
                        