Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > IT форум > Помощь студентам
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 20.01.2016, 02:57   #1
ОльгаНик
Новичок
Джуниор
 
Регистрация: 20.01.2016
Сообщений: 2
По умолчанию PASCAL: Вычислить уравнение с Рядом тейлора

Само задание выглядит так :
Вычислить и вывести на экран в виде таблицы значения функции, заданной с помощью ряда Тейлора, на интервале от xнач до xкон с шагом x с точностью Эпсилон. Таблицу снабдить заголовком и шапкой. Каждая строка таблицы должна содержать значение аргумента, значение функции количество просуммированных членов ряда.

hufyestres.png

Последний раз редактировалось Вадим Мошев; 21.01.2016 в 16:37.
ОльгаНик вне форума Ответить с цитированием
Старый 21.01.2016, 15:10   #2
newerow1989
Я самый любопытный
Участник клуба
 
Аватар для newerow1989
 
Регистрация: 24.07.2012
Сообщений: 1,949
По умолчанию

Код:
function f(x:real):real;
const c=0.00000001;
var n,fa:integer;
    s0,s1:real;
begin
   Result:=1;
   s1:=1;
   fa:=1;
   n:=1;
   Writeln('n     s');
   Repeat
      s1:=-s1*x*x;
      fa:=fa*n;
      s0:=s1/fa;
      Result:=Result+s0;
      Writeln(n,'    ',Result:5:15);
      n:=n+1;
   Until Abs(s0)<c;
end;

const dx=0.1;
      x0=0.1;
      x1=1;
var x:real;
begin
   x:=x0-dx;
   Repeat
      x:=x+dx;
      Writeln('x = ',x:2:1);
      f(x);
      Writeln;
   Until x>=x1;
   Readln;
end.
Сойдет?
С запрограммированным приветом, Неверов Евгений!
Сайт: http://newerow1989.ru
[Паскаль] [Delphi]
newerow1989 вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Вычислить и вывести на экран в виде таблицы значения функции, заданной рядом Тейлора NickNickSin Помощь студентам 1 30.11.2014 07:52
Вычислить и вывести на экран в виде таблицы значения функции, заданной рядом Тейлора dima2308 Помощь студентам 1 13.10.2014 22:23
Разложить ф-цию рядом Тейлора (С++) Дезик Помощь студентам 7 15.11.2010 09:19