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

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

13.01.2017, 18:50. Показов 2760. Ответов 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   
...   

https://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

Помощь в написании контрольных, курсовых и дипломных работ здесь.

Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
13.01.2017, 18:50
Ответы с готовыми решениями:

Составить алгоритм и программу вычисления таблицы значений функции f(x)
Составить алгоритм и программу вычисления таблицы значений функции f(x) для n значений аргумента Х,...

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

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

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

4
0 / 0 / 0
Регистрация: 13.01.2017
Сообщений: 8
14.01.2017, 00:53  [ТС] 2
Тема актуальна, прошу помочь!
0
Модератор
63400 / 47085 / 32454
Регистрация: 18.05.2008
Сообщений: 114,134
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
0 / 0 / 0
Регистрация: 13.01.2017
Сообщений: 8
20.01.2017, 18:02  [ТС] 4
Тема актуальна,прошу помочь!
0
Модератор
8417 / 4166 / 2878
Регистрация: 17.08.2012
Сообщений: 13,282
24.01.2017, 17:48 5
Лучший ответ Сообщение было отмечено ZX Spectrum-128 как решение

Решение

Не по теме:

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

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

Заказываю контрольные, курсовые, дипломные работы и диссертации здесь.

Разработать алгоритм и составить по нему программу для вычисления значений функции y = f(x)
Разработать алгоритм и составить по нему программу для вычисления значений функции y = f(x)....

Разработать алгоритм и составить по нему программу для вычисления значений функции z = f(x,y)
Разработать алгоритм и составить по нему программу для вычисления значений функции z = f(x,y)....

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

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


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

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

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