R – запис для введення та зберігання інформації від користувача

· Z – поле для введення терміну

· S – його визначення

· Datе – поле для введення дати внесення

f: file of r – перемінна для занесення запису до файлу

pol – процедура для занесення до фолу відомостей

ramo4ka – для виведення на екран рамки

menu_1 – процедура яка виводить на екран першу половину меню

menu_2 - процедура яка виводить на екран другу половину меню

del – для видалення бази

dov – для перегляду всіх існуючих термінів

2. Алгоритми

2.1 Алгоритм основної програм и

3. Вихідний код програми

uses CRT,dos;

type r=record

z:string[15];

s:string;

end;

var s1,s2,s3,s4:string;

l,i:byte;

h:char;

f: file of r;d:r;

{------------}

procedure ramo4ka (x1,y1,x2,y2,a,b:byte);

var i:integer;

begin

textbackground(a);

textcolor(b);

window (x1,y1,x2,y2);

write('Ъ');