Частина тексту файла (без зображень, графіків і формул):
1.ПОСТАНОВКА ЗАДАЧІ.
Необхідно обчислити f(x) безпосередньо та як суму функціонального ряду (f(x)=) маючи значення х та похибку d. Для цього застосуємо оператор
Repeat.
2.РОЗРОБКА СТРУКТУРИ ДАНИХ.
Позначення
Ім’я
Тип
Призначення, опис
x
x
дійсна
аргумент вхідна
f
F
дійсна
значення функції вихідна
n
n
ціла
номер члену ряду
аn
a
дійсна функція
n-й член ряду
d
дійсна константа
похибка обчислення суми ряду
–
S
дійсна
сума ряду вихідна
!
а
ціла
факторіал
3.РОЗРОБКА АЛГОРИТМУ
Оскільки необхідна кількість членів ряду невідома наперед, то необхідно використовувати цикли “до” або “поки” з виходом з них по досягненню заданої точності обчислень Треба відвести змінну для накопичення суми членів ряду, яку перед початком циклу потрібно обнулити. Для порівняння заданої та досягнутої похибок треба розрахувати f(x).
4.ТЕКСТ ПРОГРАМИ МОВОЮ PASCAL.
program lab_7;
const d: real =0.001;
var x,S,f: real; n:integer;
function fak(x:integer):integer; begin
if x=0 then fak:=1 else
fak:=x*fak(x-1); end;
function a(n:integer):real; begin
if (x>0) and (n mod 2=1) then a:=-exp((2*n+1)*ln(abs(x)))/fak(2*n+1) else
a:=exp((2*n+1)*ln(abs(x)))/fak(2*n+1);
end;
BEGIN
writeln('vvedit x');
readln (x);
S:=x; n:=1;f:=sin(x);
Repeat
S:=S+a(n);writeln('A(',n,'):',a(n):5:4);
n:=n+1;
until abs(a(n))<d;
writeln ('syma:', S:6:5);writeln('f(x):',f:6:5);
readln;
END.
5.Налагодження і результати тестування.
Висновок: я вирахував функцію f(x) безпосередньо та як суму функціонального ряду (f(x)=) і досягнув заданої точності f(x) Співпало з сумою функціонального ряду з точністю 0,005 яка є меншою за задану точність.
Міністерство освіти і науки україни
НУ «Львівська Політехніка»
Кафедра теоретичної радіотехніки та радіовимірювань.
ЛАБОРАТОРНА РОБОТА №7
ОБЧИСЛЕННЯ СУМ ФУНКЦІОНАЛЬНИХ РЯДІВ.
Підготував
студент
групи РТ-11
Гальчик
Володимир
Ви не можете залишити коментар. Для цього, будь ласка, увійдіть
або зареєструйтесь.
Ділись своїми роботами та отримуй миттєві бонуси!
Маєш корисні навчальні матеріали, які припадають пилом на твоєму комп'ютері? Розрахункові, лабораторні, практичні чи контрольні роботи — завантажуй їх прямо зараз і одразу отримуй бали на свій рахунок! Заархівуй всі файли в один .zip (до 100 МБ) або завантажуй кожен файл окремо. Внесок у спільноту – це легкий спосіб допомогти іншим та отримати додаткові можливості на сайті. Твої старі роботи можуть приносити тобі нові нагороди!