2 / 2 / 0
Регистрация: 23.12.2013
Сообщений: 21
1

Вычислить и вывести на экран в виде таблицы значения функции, заданной с помощью ряда Тейлора

23.12.2013, 05:51. Показов 1783. Ответов 2
Метки нет (Все метки)

Сам бы все это дело сделал бы да не могу у меня комп слишком "Старый" Для "Новейшего" Turbo Pascal 7.0 )) Ребят, я серьезно намучился с этими дос боксами и установкой винды на виртуалку(Так не канает).... Вообще ужс... Ошибки выдает которых у меня нет вовсе(Я про другие писанные мной программы). Я уже путаюсь в правильности написанных мной прорамм... Мне нужно 3 задания сделать.

-------------------------------------------
3.(Математику не знаю) Вычислить и вывести на экран в виде таблицы значения
функции, заданной с помощью ряда Тейлора, на интервале от
xнач до xкон с шагом dx с точностью ε. Таблицу снабдить
заголовком и шапкой. Каждая строка таблицы должна
содержать значение аргумента, значение функции и количество
просуммированных членов ряда.
[удалено]
Миниатюры
Вычислить и вывести на экран в виде таблицы значения функции, заданной с помощью ряда Тейлора  
__________________
Помощь в написании контрольных, курсовых и дипломных работ, диссертаций здесь
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
23.12.2013, 05:51
Ответы с готовыми решениями:

Вычислить и вывести на экран в виде таблицы значения функции, заданной с помощью ряда Тейлора
Вычислить и вывести на экран в виде таблицы значения функции, заданной с помощью ряда Тейлора, на...

Вычислить и вывести на экран в виде таблицы значения функции, заданной с помощью ряда Тейлора
Помогите исправить программу Program P3; var xn,xk,dx,e:real; n:integer; function...

Вычислить и вывести на экран в виде таблицы значения функции, заданной с помощью ряда Тейлора
Вычислить и вывести на экран в виде таблицы значения функции, заданной с помощью ряда Тейлора, на...

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

2
Почетный модератор
64270 / 47569 / 32739
Регистрация: 18.05.2008
Сообщений: 115,182
23.12.2013, 09:36 2
Лучший ответ Сообщение было отмечено mik-a-el как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
uses crt;
{ïðîöåäóðà âû÷èñëåíèÿ ñóììû ðÿäà(s) è ÷èñëà èòåðàöèé(i)}
procedure F(x,e:real;var s:real;var i:longint);
var t:real;
begin
s:=x;{íà÷àëüíûå çíà÷åíèÿ ïðè i=1}
t:=x;
i:=1;
while abs(t/(2*i+1))>e do{ïîêà ìîäóëü î÷åðåäíîãî ÷ëåíà ðÿäà áîëüøå òî÷íîñòè}
 begin
   i:=i+1;{íàðàùèâàåì ñ÷åò÷èê}
   t:=t*x*x;{äîìíîæàåì íà x^2}
   s:=s+t/(2*i-1);{äåëèì íà î÷åðåäíîå íå÷åòíîå è ñóììèðóåì}
 end;
s:=2*s; {óìíîæàåì íà 2}
end;
var xn,xk,e,dx,s:real;
    n:longint;
begin
clrscr;
repeat
write('Ââåäèòå íà÷àëî èíòåðâàëà -1<xn<1 xn=');
readln(xn);
until (xn>-1)and(xn<1);
repeat
write('Ââåäèòå êîíåö èíòåðâàëà ',xn:0:1,'<xk<1 xk=');
readln(xk);
until (xk>xn)and(xk<1);
repeat
write('Ââåäèòå òî÷íîñòü â èíòåðâàëå (0,1) e=');
readln(e);
until(e>0)and(e<1);
repeat
write('Ââåäèòå øàã òàáóëÿöèè, ïîëîæèòåëüíîå ÷èñëî ìåíüøå ',xk-xn:0:2,' dx=');
readln(dx);
until (dx<xk-xn)and(dx>0);
clrscr;
writeln('      Òàáëèöà òàáóëèðîâàíèÿ ôóíêöèè ln((1+x)/(1-x))');
writeln('íà èíòåðâàëå ',xn:0:2,'  ',xk:0:2,' ñ øàãîì ',dx:0:2,' ñ òî÷íîñòüþ ',e:0:6);
writeln('----------------------------------------');
writeln('|       |           |     1+x    |     |');
writeln('|   x   | âû÷èñëåíî |  ln-----   |  n  |');
writeln('|       |           |     1-x    |     |');
writeln('----------------------------------------');
while xn<=xk+e do
 begin
  F(xn,e,s,n);
  writeln('|',xn:6:2,' |',s:10:6,' |',ln((1+xn)/(1-xn)):10:6,'  |',n:4,' |');
  xn:=xn+dx;
 end;
writeln('----------------------------------------');
readln
end.
1
2 / 2 / 0
Регистрация: 23.12.2013
Сообщений: 21
23.12.2013, 23:54  [ТС] 3
Спасибо друг. Реально помог.
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
23.12.2013, 23:54
Помогаю со студенческими работами здесь

Вычислить и вывести на экран в виде таблицы значения функции, заданной с помощью ряда Тейлора
Вычислить и вывести на экран в виде таблицы значения функции, заданной с помощью ряда Тейлора, на...

Вычислить и вывести на экран в виде таблицы значения функции, заданной с помощью ряда Тейлора
помогите заменить формулу,пожалуйста) формулу прикрепил. program demo; var...

Вычислить и вывести на экран в виде таблицы значения функции, заданной с помощью ряда Тейлора
Вычислить и вывести на экран в виде таблицы значения функции, заданной с по- мощью ряда Тейлора,...

Вычислить и вывести на экран в виде таблицы значения функции, заданной с помощью ряда Тейлора
Вычислить и вывести на экран в виде таблицы значения функции, заданной с помощью ряда Тейлора, на...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2023, CyberForum.ru