Программа для вычисления значения функции - Turbo Pascal

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


textual

Код к задаче: «Программа для вычисления значения функции - Turbo Pascal»

uses crt;
const
e=0.00000001;
var x,t,s:real;
    n:integer;
begin
clrscr;
write('x=');readln(x);
t:=x;
s:=x;
n:=0;
while abs(t)>=e do
 begin
  n:=n+1;
  t:=-t*x*x/(2*n*(2*n+1));
  s:=s+t;
 end;
writeln('Приближенное значение  sinx=',s:10:8);
writeln('Аналитическое значение sinx=',sin(x):10:8);
readln
end.

СДЕЛАЙТЕ РЕПОСТ

11   голосов, оценка 3.909 из 5



Похожие ответы
  1. Задание собственно такое: Составить программу формирования из вектора A={ai}, i=1/3n вектора B={bi}, i=1/n, очередная компонента которого равна среднему арифметическому очередной тройки компонент вектора. вот сама программа:

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

  1. Создать модуль, дополняющий математические возможности Паскаля функциями для нахождения площади треугольника: «sGeron» - по известным трем сторонам, «sH» - по известным высоте и стороне основания, «Salfa» - по двум сторонам и углу между ними. Составить программу, которая использует данный модуль.

  1. дана функция, которая находит максимальный элемент матрицы, в основном теле ползователь рандомом задает 2 матрицы, как сделать так, чтобы программа находила разность между максимальными этих 2 матриц и выводила на экран

  1. Помогите пожалуйста составить программу на языке Turbo Pascal 7.0 вычисления значения интеграла на интервале [a, b] для функции, заданной графически. Значение интеграла вычислить приближённо по итерационной формуле левых прямоугольников: где h=(b-a)/n - величина шага между двумя соседними точками разбиения интервала интегрирования; fi = f(xi) - значение функции в точке xi = a+h(i-1); i = 1, 2, ..., n. Вычисления закончить при выполнении условия |In-I2n| < z, где z>0 - достаточно малое значение, задаваемое пользователем (точность вычислений). Здесь In, I2n - значения интеграла, вычисленные по (1) при количестве интервалов разбиения n и 2n соответственно. Функция:

  1. Помогите решить интересную задачу, в нете искал и не смог найти нормального ответа. ЗАранее Спасибо! Написать подрограмму для логического оператора AND, без использования логических операторов . Напривер a and b .

  1. Вводится какое-то число n, к примеру, 2473, а программа должна поменять порядок следования цифр таким образом, чтобы получилось максимальное возможное из этих цифр число(в данном случае - 7432). Количество цифр в числе n должно находится автоматически или вводится с клавиатуры.

  1. Помогите,пожалуйста, написать программу в Pascal