Форум программистов, компьютерный форум, киберфорум
Наши страницы
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.80/5: Рейтинг темы: голосов - 5, средняя оценка - 4.80
GooD_TeaM
0 / 0 / 0
Регистрация: 13.01.2017
Сообщений: 8
1

Разработать алгоритм и составить программу вычисления таблицы значений функции

13.01.2017, 18:50. Просмотров 946. Ответов 4
Метки нет (Все метки)

Разработать алгоритм и составить программу вычисления таблицы значений функции, заданной в виде разложения в ряд. Значение функции вычислять с точностью ε>0, т.е., вычисление суммы членов ряда необходимо прекратить, когда абсолютная величина очередного члена ряда разложения окажется меньше ε: |ak|<ε.

При вычислении очередного члена ряда целесообразно воспользоваться рекуррентным выражением:

ak+1=ckak; k = 0, 1, 2, ...,

где ak - некоторый k-ый член ряда; ak+1 - следующий k+1-ый член ряда; ck - коэффициент, определяемый номером k.

При создании программы необходимо по возможности воспользоваться операторами организации циклов WHILE, REPEAT, FOR.

Границы интервала вычисления функции a и b, величина шага изменения аргумента h и точность вычисления функции ε задаются при вводе. На печать выводится номер по порядку, значение аргумента, соответствующее еьу, значение функции и номер члена ряда, на котором закончилось вычисление значения функции, в форме таблицы:

xf(x)№чл.р.
1   
2   
3   
...   

http://www.cyberforum.ru/cgi-bin/latex.cgi?<br />
f(x)=1-\frac{x^2}{2}+\frac{\left(\frac{x}{2}\right)^4}{1^2\cdot 2^2}-...+(-1)^k\,\frac{\left(\frac{x}{2}\right)^{2k}}{(k!)^2}+...<br />
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
13.01.2017, 18:50
Ответы с готовыми решениями:

Разработать программу в паскале для вычисления таблицы значений модуля комплексной функции
Задана комплексная функция ...

Составить программу для вычисления и вывода на экран таблицы значений функции
Составить программу для вычисле-ния и вывода на экран таблицы значений функции....

По данным разработать алгоритм и программу вычисления функции У
1.) По данным разработать алгоритм и программу вычисления функции У (Х...

составить алгоритм и программу вычисления значений элементов одномерного массива X1,X2, ..., Xm-1
Помогите решить сложное задание Дана переменная B и матрица А, состоящая из...

Найти рекуррентную формулу, разработать схему алгоритма и Pascal-программу вычисления таблицы значений функци
---

4
GooD_TeaM
0 / 0 / 0
Регистрация: 13.01.2017
Сообщений: 8
14.01.2017, 00:53  [ТС] 2
Тема актуальна, прошу помочь!
0
Puporev
Модератор
54582 / 42088 / 29061
Регистрация: 18.05.2008
Сообщений: 99,260
14.01.2017, 10:22 3
Лучший ответ Сообщение было отмечено ZX Spectrum-128 как решение

Решение

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
uses crt;
//процедура вычисления суммы ряда(s) и числа итераций(i)
procedure F(x,e:real;var s:real;var i:longint);
var t,x1:real;
begin
t:=1;//начальные значения при i=1
s:=t;
x1:=x/2;
i:=0;
while abs(t)>e do//пока модуль очередного члена ряда больше точности
 begin
   i:=i+1;//наращиваем счетчик
   t:=-t*x1*x1/sqr(i);//менякм знак, домножаем на x1^2 и делим на квадрат индекса
   s:=s+t;//и суммируем
 end;
end;
var a,b,h,e,s:real;
    i,n:integer;
begin
write('Введите начало интервала a=');
readln(a);
repeat
write('Введите конец интервала b>',a:0:1,' b=');
readln(b);
until b>a;
repeat
write('Введите точность в интервале (0,1) e=');
readln(e);
until(e>0)and(e<1);
repeat
write('Введите шаг табуляции, положительное число меньше ',b-a:0:2,' h=');
readln(h);
until (h<b-a)and(h>0);
clrscr;
writeln('Таблица табулирования функции, представленной разложением в ряд');
writeln('на интервале ',a:0:2,'  ',b:0:2,' с шагом ',h:0:2,' с точностью ',e:0:6);
writeln('----------------------------');
writeln('| №пп |  x  |  f(x)  |  n  |');
writeln('----------------------------');
i:=0;
while a<b+e do
 begin
  i:=i+1;
  F(a,e,s,n);
  writeln('|',i:4,' |',a:5:2,'|',s:8:4,'|',n:4,' |');
  a:=a+h;
 end;
writeln('----------------------------');
end.
1
GooD_TeaM
0 / 0 / 0
Регистрация: 13.01.2017
Сообщений: 8
20.01.2017, 18:02  [ТС] 4
Тема актуальна,прошу помочь!
0
Cyborg Drone
Модератор
5290 / 3169 / 2441
Регистрация: 17.08.2012
Сообщений: 10,178
24.01.2017, 17:48 5
Лучший ответ Сообщение было отмечено ZX Spectrum-128 как решение

Решение

Не по теме:

GooD_TeaM, фотки с текстом не выкладывайте. Это запрещено.

И чем Вам не понравилось приведённое решение? А то как-то неловко получается: решение приведено, заданию соответствует, а тема вдруг снова актуальна... Типа, на одноклеточных, которые выдали Вам непонятное для Вас решение, внимание можно не обращать, и не объяснять ничего. И кто Вам теперь ответит? И с какого перепуга? И что, чёрт возьми, не так? И чем Вам теперь помочь? Напишите, по какой причине Вы подняли тему. Или Вам до сих пор невдомёк, что, если правильный ответ уже дан, на Ваши ничем не обоснованные реплики никто внимания не обратит?
1
24.01.2017, 17:48
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
24.01.2017, 17:48

Составить алгоритм и программу вычисления функции
Составить алгоритм и программу вычисления функции, x, y – вводится с клавиатуры...

Составить алгоритм и программу вычисления функции
Пожалуйста помогите составить программу, заранее спасибо! Составить алгоритм...

Разработать алгоритм и программу вычисления функции для элементов блока квадратной матрицы [A]
Дана задача, не могу понять, что в ней надо сделать:wall: Разработать алгоритм...


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

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

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru