Составить программу для вычисления значения функции - Pascal (84720)

Узнай цену своей работы

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

Составить программу для вычисления значения функции y = arcsin(x) с помощью разложения функции в степенной ряд.
Саму функции прикрепил к посту.

Решение задачи: «Составить программу для вычисления значения функции»

textual
Листинг программы
const e=10e-10;
var s,si,x:real;
   i:integer;
begin
  repeat
    write('|x|<1, x = '); readln(x);
  until abs(x)<1;
  s:=x;si:=x;i:=0;
  repeat
    inc(i);
    si:=si*x*x*(2*i-1)/(2*i);
    s:=s+si/(2*i+1);
  until abs(si/(2*i+1))<e;
  writeln('s = ',s:0:10,', arcsin(x) = ',arcsin(x):0:10);
  readln
end.

Объяснение кода листинга программы

  1. Константа e равна 10 в степени -10.
  2. Вводимые пользователем значения x будут сохраняться в переменной x типа real.
  3. Используется тип integer для переменной i, которая будет использоваться в цикле.
  4. Переменные s и si инициализируются значением x.
  5. Цикл повторяется до тех пор, пока значение si/(2*i+1) не станет меньше e.
  6. Значение переменной s обновляется путем добавления значения si/(2*i+1) к предыдущему значению s.
  7. Значение переменной si обновляется путем умножения значения si на xx(2i-1)/(2i).
  8. Значение переменной i обновляется на 1 при каждом проходе цикла.
  9. Функция arcsin(x) используется для вычисления арксинуса значения x и сохраняется в переменной arcsin(x).
  10. Выводится значение переменной s и arcsin(x).
  11. Программа ожидает ввода от пользователя, чтобы продолжить.

Оцени полезность:

9   голосов , оценка 3.778 из 5
Похожие ответы