Лабораторна робота № 9 функції тp-програми

МЕТА РОБОТИ: вивчити і освоїти методику розробки схем алгоритмів і складання програм розв’язування задач з використанням функцій.

Теоретичні відомості

Функція- це підпрограма, результатом виконання якої є одне скалярне значення, яке присвоюється імені цієї функції. Опис функції аналогічний опису процедури і складається з заголовка і блока. Заголовок функції має вигляд:

Function <ім’я> (<список параметрів>):<тип>;

де Function- службове слово;

ім’я- ім’я функції;

список параметрів- перелік формальних параметрів(вихідних даних) з врахуванням їх типу;

тип- тип результату.

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

ЗАВДАННЯ 9.

1. Ознайомитися із теоретичним матеріалом по даній лабораторній роботі.

2. Набрати на ЕОМ наступну програму :

{ ПРИКЛАД 8

Обчислити інтеграл від функції за допомогою формули трапецій (x_j=a+jh; h=(b-a)/N; ;) на проміжку [0, 14]. Для обчислення інтегралу побудувати функцію, параметрами якої є нижня і верхня границі проміжку інтегрування та кількість розбиттів. }

program integral;

var c,d,r: real;

k:integer;

function f(x:real):real;

begin

f:=sin(x*x+x)

end;

function I(a,b:real;n:integer):real;

var xj,h,s:real;

j:integer;

begin

h:=(b-a)/n;

s:=0;

for j:=1 to n-1 do

begin

xj:=a+j*h;

s:=s+f(xj)

end;

I:=h*((f(a)+f(b))/2+s);

end;

begin

writeln('введіть кількість розбиттів k=');

readln(k);

r:=I(0,14,k);

writeln('integral=',r:8:3);

readln;

end.

3. Натиснути комбінацію клавіш 'ALT' + 'F9'. Якщо не виявлено помилок- натиснути комбінацію клавіш 'CTRL' + 'F9'. На екрані з'явиться повідомлення:

введіть кількість розбиттів k=

4. Ввести з клавіатури кількість розбиттів (в кінці вводу - 'ENTER'):

10

5. На екрані з'явиться результ виконання програми:

integral=-4.494

4. Обчислити інтеграл від заданої функції на проміжку [0, L], де L – номер варіанту.

5. Звіт по виконаній лабораторній роботі здати викладачу.

Контрольні питання

1. Яка підпрограма називається функцією?

2. За яким алгоритмом складається підпрограма функції?

3. Яка особливість роботи з підпрограмами функції?

Література

1. А.И.Марченко, Л.А.Марченко. Програмирование в среде Turbo Pascal 7.0.-М.:”Бином Универсал”, К.:”Юниор”, 1997.-496с.

2. Рюттен Т., Франкен Г. Турбо Паскаль 7.0. – К.: BHV, 1998. – 448 с.

3. В.Я.Сердюченко. Розробка алгоритмів та програмування мовою Turbo Pascal.–Х.: ВКП “Паритет”ЛТД, 1995.-352с.

4. Інформатика. Комп’ютерна техніка. Комп’ютерні технології. За редакцією О.І.Пушкаря. –К: Видавничий центр “Академія”, 2001. –696 с.

5. Г. Л.Семашко, А.И.Салтыков. Програмирование на языке Паскаль.-М.:Наука,1988.-128с.

6. С.А. Абрамов и др. Задачи по програмированию.-М.:Наука.1988.-224с.

7. Культин Н.Б. Turbo Pascal в примерах и задачах. –СПб.:, БХВ – Санкт - Петербург, 2000. – 256 с

8. Леонтьев В.П. Новейшая энциклопедия персонального компьютера 2001.- М.:ОЛМА-ПРЕСС, 2001.-847с.

9. Обчислювальна техніка та програмування. Методичні вказівки та контрольні завдання. Упорядник доц. Дутчак Б.І.- Луцьк, ЛІІ, 1993. - 60 с.

10. Лінійні обчислювальні процеси. Методичні вказівки. Упорядники Сорока Р.О., Пех П.А., Джигалюк Р.Я. – Луцьк: ЛДТУ, 1998. - 36 с.

11. Розгалужені обчислювальні процеси. Методичні вказівки. Упорядники Сорока Р.О., Пех П.А., С.Д. Волощук. – Луцьк, ЛДТУ, 2001. - 30 с.

12. Обчислення сум, добутків, рекурентних співвідношень. Методичні вказівки. Упорядники Сорока Р.О., Герасимчук Б.В. – Луцьк: ЛДТУ, 2001. - 21 с

13. Ітераційні обчислювальні процеси. Методичні вказівки. Упорядники Пех П.А., Герасимчук Б.В., Волощук С.Д.. – Луцьк: ЛДТУ, 2000. - 45 с

14. Одномірні масиви. Методичні вказівки. Упорядники Пех П.А., Сорока Р.О., Волощук С.Д.. – Луцьк: ЛДТУ, 1998. - 46 с

44