InitBase();

bprint();

bdel(8);

printf("Створюємо базу даних\n");

bput(1, "рядок1");

bput(2, "рядок2");

bput(3, "рядок3");

bput(4, "рядок4");

bprint();

printf("Видаляємо записи з ключами 1 і 3\n");

bdel(1);

bdel(3);

bprint();

printf("Додаємо записи 5,6 і 7\n");

bput(5, "рядок5");

bput(6, "рядок6");

bput(7, "рядок7");

bprint();

printf("Замінюємо рядок у запису з ключем 2\n");

bchange(2, "новий рядок 2");

bprint();

printf("Замінюємо рядок у запису з ключем 4\n");

bchange(4, "новий рядок 4");

bprint();

printf("Замінюємо рядок у запису з ключем 3 і ключ 3 на 9\n");

bchange(2, "новий рядок 2");

bprint();

i=bget(3);

printf("Зараз запис із ключем 3 містить \"%s\"\n",

tmp.b_val);

bmod(i,8, "Новий рядок 3/9");

bprint();

closeBase();

}

Завдання для самостійної роботи

1. Серед тризначних чисел знайти такі, щоб сума факторіалів їхніх цифр рівнялася б самому числу, використовуючи підпрограму обчислення факторіала.

2. Дано координати трикутника й точки на площині. Визначити, чи лежить точка всередині трикутника.

3. Описати функцію Min2(A, B), Max2(A,B), що знаходить мінімальне/макси­мальне із двох дійсних чисел А та B. За її допомогою знайти мінімальні/максимальні із пар чисел A та B, A та C, A та D, якщо дано числа A, B, C, D.

4. Описати функцію Fact2(N) цілого типу, що обчислює значення подвійного факторіала: N!!  1·3·5·...·N, якщо N непарне, N!!  2·4·6·...·N, якщо  N парне (N  0 – параметр цілого типу).

5. Описати функцію Exp1(x,eps) дійсного типу (параметри x, eps дійсні, eps > 0), що знаходить наближене значення функції exp(x):

exp(x)  1  x  x²/2!  x³/3! ... xⁿ / n! ... .

У сумі враховувати всі доданки, більші за eps. За допомогою Exp1 знайти наближене значення експоненти для даного x при шести даних eps.

6. Описати функцію Power(x,a,eps) дійсного типу (параметри x, a, eps дійсні, |x|  1, a  0, eps > 0), що знаходить наближене значення функції (1  x)^a:

(1  x)^a  1  a·x  a·(a – 1)·x²/2!  a·(a – 1)·...·(a – n  1)·xⁿ / n!... .

У сумі враховувати всі доданки, за модулем більші ніж eps. За допомогою PowerA знайти наближене значення (1  x)^a для заданих x та a за шести різних значень eps.

7. Описати функцію Length(Ax,Ay,Bx,By) дійсного типу, що знаходить довжину відрізка AB на площині за координатами його кінців:

 AB   sqrt((Ax – Bx)²  (Ay – By)²)

(Ax, Ay, Bx, By – дійсні параметри). За допомогою цієї функції знайти довжини відрізків AB, AC, AD, якщо дано координати точок A, B, C, D.

8. Використовуючи функцію Length із попереднього завдання, описати функцію Perim(Ax,Ay,Bx,By,Cx,Cy) дійсного типу, що знаходить периметр трикутника ABC за координатами його вершин (Ax, Ay, Bx, By, Cx, Cy – дійсні параметри). За допомогою цієї функції знайти периметри трикутників ABC, ABD, ACD, якщо задано координати точок A, B, C, D.

9. Використовуючи функції Length та Perim із попереднього завдання, описати функцію Area(Ax, Ay, Bx, By, Cx, Cy) дійсного типу, що знаходить площу трикутника ABC за формулою Герона. За допомогою цієї функції знайти площі трикутників ABC, ABD, ACD, якщо дано координати точок A, B, C, D.

10. Використовуючи функції Length та Area із попереднього завдання, описати процедуру Dist(Px, Py, Ax, Ay, Bx, By, D), що знаходить відстань D від точки P до прямої AB за формулою D  2S_PAB /AB , де S_PAB – площа трикутника PAB. За допомогою цієї процедури знайти відстані від точки P до прямих AB, AC, BC, якщо дано координати точок P, A, B, C.

11. Використовуючи процедуру Dist із попереднього завдання, описати процедуру Heights(Ax, Ay, Bx, By, Cx, Cy, h1, h2, h3), що знаходить висоти h1, h2, h3 трикутника ABC, проведені відповідно з вершин A, B, C. За допомогою цієї процедури знайти висоти трикутників ABC, ABD, ACD, якщо дано координати точок A, B, C, D.

7

ОБ'ЄКТНО-ОРІЄНТОВАНЕ програмування ТА С++

Основи сучасного програмування Основи сучасного програмування Основи сучасного програмування Основи сучасного програмування Основи сучасного програмування Основи сучасного