МІНІСТЕРСТВО ОСВІТИ І НАУКИ УКРАЇНИ Національний університет «Львівська політехніка» Інститут телекомунікацій, радіоелектроніки та електронної техніки Кафедра теоретичної радіотехніки та радіовимірювань
ЗВІТ до лабораторної роботи №6 на тему: «ТАБУЛЮВАННЯ ФУНКЦІЇ ОДНОГО АРГУМЕНТУ» з дисципліни “ІНФОРМАТИКА ТА ОБЧИСЛЮВАЛЬНА ТЕХНІКА" ЛАБОРАТОРНА РОБОТА №6 ТАБУЛЮВАННЯ ФУНКЦІЇ ОДНОГО АРГУМЕНТУ. Мета роботи - засвоїти методику та виробити практичні навички застотування однієї з керуючих структур  повторення операцій або циклів  для багаторазових обчислень значень виразу. 6.2 ЗАВДАННЯ. Протабулювати задану функцію y=f(x) в інтервалі [a,b] з кроком x. Табл. 6.1. Варіанти завдань. Варіант f(x) a b x  1 sin(x)x     6.3.2 РОЗРОБКА СТРУКТУРИ ДАНИХ. Табл. 6.2. Розробка структури даних. Позначення  Ім’я  Тип  Призначеня, опис   а  a дійсна змінна  початок інтервалу табулювання, вхідна   b  b  -“- кінець інтервалу табулювання, вхідна   x  x  -“-  аргумент функції   x  dx  -“- крок табулювання, вхідна   f(x)  fx(x) функція підпрограма обчислення функції   y  y дійсна змінна значення функції    Row ціла змінна  номер рядка на сторінці    Page  -“- номер сторінки   ColumnsNum  -“- кількість рядків, що можуть бути розміщені на сторінці  6.3.3 РОЗРОБКА АЛГОРИТМУ
6.3.4 ТЕКСТ ПРОГРАМИ. program table; uses crt; const maxrowsnum=24; var a,b,dx,x,y:real; page:integer; row:integer; columnsnum:integer; function f(a:real):real; begin if a<>0 then f:=sin(x)/x else f:=0; end; procedure zatrymka; begin repeat until keypressed; end; begin clrscr; writeln('obchyslennja znachen funktsiji y=sin(x)/x'); write('liva granytsja intervalu: '); readln(a); write('prava granytsja intervalu: '); readln(b); write('krok: '); readln(dx);x:=a; clrscr; page:=1;row:=5; gotoxy(1,1);write('storinka:');gotoxy(10,1);write(page); gotoxy(1,2); writeln('+--------------------------------------+--------------------------------------+'); writeln('| argument | functsija |'); writeln('+--------------------------------------+--------------------------------------+'); repeat y:=f(x); gotoxy(1,row);write('|');gotoxy(40,row);write('|');gotoxy(79,row);write('|'); gotoxy(2,row); write(x:6:4); gotoxy(41,row); write(y:6:4); inc(row); x:=x+dx; if row=maxrowsnum then begin gotoxy(10,1); write(page); zatrymka; row:=5; inc(page); end; until x>b; zatrymka; end. 6.3.5 НАЛАГОДЖЕННЯ ТА РЕЗУЛЬТАТИ ТЕСТУВАННЯ. В цьому розділі необхідно навести діалог користувача з комп’ютером при введенні даних, одну з виведених на екран сторінок таблиці, перевірити за допомогою калькулятора або ЕОМ декілька з розрахованих значень.

Висновок: В процесі розробки, запису і виконання програми я здобув практичні навички та засвоїв методику застотування однієї з керуючих структур  повторення операцій або циклів  для багаторазових обчислень значень виразу.