"Кітапхана" деректер базасы (Delphi тілінде)

Мазмұны

1 Жергілікті және деректер базасы
1.1 Жалпы мағлұматтар
2 Деректер базасын құру
2.1 Каталог құру
2.2 Бүркеншік ат құру
2.3 Кесте құру
2.4 Кесте мен деректер базасы арасындағы байланыс
2.5 Сұрау жасау (запрос)
2.6 Есептеме жасау (отчет)
2.7 Анықтамалық жасау
3 «Кітапхана» деректер базасының құрылысы
4 Программа листингісі
        
        ҚАЗАҚСТАН  РЕСПУБЛИКАСЫНЫҢ БІЛІМ ЖӘНЕ ҒЫЛЫМ МИНИСТРЛІГІ
ҚАРАҒАНДЫ МЕМЛЕКЕТТІК ТЕХНИКАЛЫҚ УНИВЕРСИТЕТІ
САПР кафедрасы
Зертханалық жұмыс №6
деректер ... ... ... - 10 - 1 ... ... ... ... ... ... ... және ... базасы
+ Жалпы мағлұматтар
* Деректер базасын құру
+ Каталог құру
+ Бүркеншік ат құру
+ Кесте құру
+ Кесте мен ... ... ... ... ... жасау (запрос)
+ Есептеме жасау (отчет)
+ Анықтамалық жасау
* деректер базасының құрылысы
4 ... ... ... ... ... ... деп ақпаратпен қамтамасыз ететін бағдарламаны айтады. Мұндай бағдарламаны қосқан кезде бейнебетте (экранда) кесте пайда болады, одан қолданушы өзіне керектіні қарай ... Егер жүйе ... ... ба,дарламашы оған жаңа ақпарат қосып, керексізін жоя алады.
Жалпы алғанда деректер ... ... ... жиыны.
Қазіргі кезде деректер базасы жергілікті (dBase, FoxPro, Access, Paradox) және (Interbase, Oracle, Sysbase, Infomix, ... SQL Server) ... ... ... ... dBase, Infomix және Oracle ... ... жұмысын құруға мүмкіндік беретін құраластар бар.
Жергілікті деректер базасы бір құралда болады. Құрал ретінде ... ... ... желілік дискі бола алады.
Бірнеше қолданушы арасында деректерді бөлуді қамтамасыз ету үшін файлдарды бұғаттау деп аталатын әдіс қолданылады. Ол бір ... ... ... ... ... алады. Бұл әдістің мәнісі: бір қолданушы деректерді қолданып ... ... ... ол ... ... істей алмайды, яғни деректер оған жабық болады.
dBase, FoxPro, Access, Paradox- жергілікті деректер ... ... алыс ... басқа компьтерде тұрады.
Онымен жұмыс екі бөліктен тұрады: тұтынғыш (клиенттік) және серверлік. Тұтынғыш қолданшы компьютерінде жұмыс істейтін ... ... ол ... ... өзара әрекетті қамтамасыз етеді.
Серверлік алыс компьютерде жұмысты қамтамасыз ететін бағдарлама бөлігі. Ол ... ... ... жібереді, орындайды.
Сұраулар SQL (құрылымды сұрау) тілінде берілетін әмірлер.
Алыс сервер бағдарламасы бірмезетте бірнеше қолданушыны қамтамасыз ете алады. ... ... ... механизмінің орнына бірізді амалдар (транзакция) тетігі жұмыс істейді.
Бірізді ... - бұл ... ... ... ... ... орындалатын әрекеттер тізбегі. Ол аппарат іркілісінен қорғауды қамтамасыз етеді.
Алыс деректер базасымен жұмыс қиын, әрі ...
+ ... ... ... ... ... ... ақпараттар жиыны болып табылады.
Бұған мысалы деректер ... ... ... ... ... базасының ақпараты файлдардан тұрады. Деректер базасы жазбалардан тұрады. Әр жазбада бір дана ақпарат қана ... ... бұл ... ... жатады. Жазба өрістерден тұрады. Әр өріс сипаттамасының деректері болады. Әдетте бұл кестенің бағандары болып ... ... ... ... ... Кестенің әр жолы жазба, кесте ұяшалары-өрістер. Кесте бағанының тақырыбы- өріс аты, кесте ... ... ... ... ... ... кесте жеке файлда сақталады. Бірақ деректер базасы мен кестені теңесіруге болмайды, себебі бір өріс ... ... ... ... ... яғни әр ... файлдарда қатыса алады.
Деректер базасымен жұмыс істейтін бағдарламаның ақпарат көзі барлық кесте болады.
Деректер С:, D: дискі каталогтерінде немесе желілік ... ... ... ... ... ... базасының тұрған орнын білу мәселесі пайда болады. Ол деректер базасының бүркеншік атын пайдалану арқылы шешіледі. Бүркенші ат (Alias) деп ... ... ... ... ... сәйкес келетін қысқаша атауды айтады. Деректер базасымен жұмыс істейтін бағдарлама деректерді алу ... ... атты ... бүркеншік атты қолданады.
Деректер базасымен жұмысты қамтамасыз ететін , бағдарлама Borland Database Engine (BDE) ... ... ... Деректер базасының бүркеншік аты BDE Administrator бағдарламасымен құрылады.
* ... ... ... ... ... ... ... үшін каталог әдеттегідей, мысалы, Жетектегіш көмегімен құрылады. Деректердің ... ... ... ... ... ішкі ... орналастырылады.
+ Бүркеншік ат құру
Деректер базасының бүкеншік атауы BDE Administrator бағдарламасымен құрылады. Ол былайша қосылады: ... Delphi7\ BDE ... ... BDE Administrator сұхбат терезесі)
Терезенің сол жағында Databases тіркемеде, осы компьютерде тіркелген бүркеншік аттары келтірілген. Жаңа бүркеншік ат ... ... ... ... ... ... алк керек. Сосын New Database Alias New(деректер базасының жаңа бүркеншігі) терезеде Database Name тізімінен деректердің құрылатын ... ... ... ... керек, нақтырақ айтсақ құрылатын деректер базасының түрін таңдау керек.
Бүркеншік ат құрған кезде әдетте STANDARD ... ... Ол Paradox ... ... алуды қамтамасыз етеді. Драйверді таңдап,OK батырмасын басқан соң, бұрынғы ... ... жаңа ... ... ... ... ... сәйкес biblioteka бүркеншік атын құрдым. Осы құрылған бүркеншік атын ішкіқұрылым файлында тіркеу үшін OBJECT \APPLY әмірін таңдап, OK ... басу ... ... ... ... ... екі кесте құрылуы қажет. 1-кесте, кітап авторлары жайлы мәліметтерді қамтуы керек (кітаптың аты, кітап қай тілде жазылды, автордың тұратын ... қай ... ... ... және т.б), ... қараша айында кітап алған студенттер жайлы мағлұматтар (студенттің ... ... ... мамандығы және т.б).
Жалпы түрде кестені қалай құрғаныма ... ... ол ... Tools\Database Desktop әмірін қосыңыз.
* File\New\Table басыңыз. Ашылған Create Table сұхбат терезесінен ... ... алу ... (әдеттегідей Paradox 7)
Нәтижесінде Create Paradox 7Table терезесі шығады (2-сурет).
(2-сурет. Create Paradox 7Table сұхбат ... ... әр ... үшін атау мен түр, егер ... болса өлшем беріледі. Өріс аты деректерді алу үшін қолданылады. Ат Field Name бағанына өндіріледі, ол ... ... 25 ... аспайды. Өріс түрі дерек түрін анықтайды. Түр Type бағанына нышандық тұрақты енгізумен ... Өріс түрі мен оның ... ... ... ... ... Өріс ... және оның тұрақтылары )
Түрі
Тұрақты
Өріс мәні
Alpha
A
Нышандар жолы. Size-жол ұзындығы (1-255 аралығында)
Number
N
15 мәнді аралықта жатқан ... ... сан. ... ... ... бөлгіші арқылы топқа бөлінеді
Short
S
-32767, 32767 аралықтағы бүтін сан
Long Integer
I
-2 147 483 648, 2 147 483 647 ... ... ... ... түн ... ... уақыт
Memo
M
Кез келген ұзындықты нышандар жолы. Мұнда мәтін тұрады.
Timestamp
@
Уақыт пен дата
Formatted Memo
F
Нышандар жолы. Қаріп түрі мен өлшемін, бейнелеу әдісі мен ... ... ... ... ... ... (true) және өтірік (false)
Auto-Increment
+
Бүтін сан. Кестеге кезекті жазбаны қосқан кезде өрістегі сан бір ... ... ... ... Мұндай өрістер Database Desktop бағдарламасы қолданылмайтын деректерді сақтауға қолданылады.
Bynary
B
Екілік деректер. Мұндай өрістер Database Desktop қолданылмайтын деректерді сақтауға қолданылады. Memo түріндегі ... ... бұл ... ... ... ... ... әдетте аудио-деректер жатады.
Менің тапсырмамдағы кестелер келесі түрде болады.
(3-сурет. Кітап авторлары мен олардың туындылары жайлы мағлұматтар)
(4-сурет. Қараша айында кітап алған ... ... ... ... мен ... ... ... байланыс
Деректер базасын құру Database, Table, Query, DataSourse құраластарымен қамтамасыз етіледі. Бұлар DataAccess пен BDE құраластар ... ... ... деректер базасын тұтас, яғни кестелер жинағы ретінде береді, ал Table дерек базасының бір кестесін алады. DataSourse (деректер көзі) оларды ... ... DBGrid пен Table ... SQL ... SQL-сұрауын орындауды қаматамасыз етеді. DataSourse құраласы деректер көзін алуға бір құраласты пайдалануға мүмкіндік береді, мысалы, ... ... ... үшін ... немесе осы кестеде SQL-сұрауды орындау керек.
Менің тапсырмамдағы екі кестені деректер базасымен ... соң, ... ... ие ... ... деректер базасы)
(6-сурет. деректер базасы)
+ Сұрау ... ... ... ... ... істегенде, әдетте оның барлығы емес, кейбір нақты бір бөлігі керек болады. Керекті ақпарат жазбаны қарау арқылы табылады.
Кейбір ... ... ... ... ... Query ... ...
Query құраласы Table құраласына ұқсас, айырмашылығы оның бүкіл деректер базасын емес, оның тек бөлігін ғана шығарады.
Query құраласының ... аты. ... ... (құралас) мен сұрауды орындау байланысы үшін DataSourse құраласы қолданылады, мысалы, DBGrid
SGL
SQL тілінде жазылған деректер базасының сұрауы
Active
Сипатын true мән берілген ... ... ... ... ... ... ... сұрау (запрос) "t" әріпінен басталатын кітап жанрына байланысты орындалады (7-сурет).
(7-сурет. ... ... ... терезесі)
Деректі кестеден таңдау келесі түрде болады (Бұл сұрау ... ... ... Button ... ... := ... := ... сұраудың мәні Label1-ге шығарылады.
+ Есептеме жасау
деректер базасындағы есептеме Excel-дан ... Ол үшін ... ... xls ... бар 1 файл құрамыз. Сол файл Delphi - дан шақырылатындай ету үшін функиялар құрастырамыз.
(8-сурет. ... ... ... ... ... ... ... (отчет) MainMenu-дағы тетігін басу арқылы шығарылады. Есептеменің ... ... ... түрде болады:
VExcel := CreateOleObject('Excel.Application');
VExcel.Visible := True;
VExcel.WindowState := -4137;
VExcel.WorkBooks.Open('G:\Otchet.xls');
+ Анықтамалық құру
Microsoft Word программасында сноскалар ... ... бар, ... ... ... файлдар құрастырамыз. Мысалы, Библиотека жайлы мағлұмат келесі түрде болады: (9-сурет)
(9-сурет. деректер базасының анықтамалық құрастыру кезінде пайдалынылатын ... ... ... Microsoft Help Workshop программасы арқылы анықтамалыққа айналдырамыз.
Ол үшін ... ... File\ New \Help Project ... ... ... кейін Project File Name терезесі ашылады (10-сурет).
Ашылған ... ... ... ... атын ... ... таңдаған соң, анықтамалық жүйе проектісінің терезесі ашылады (11-сурет).
(10-сурет. Project File Name терезесі)
(11-сурет. Анықтамалық жүйе ... ... жүйе ... ... Files ... көмегімен файлдарымызды таңдаймыз. Одан соң Window батырмасының көмегімен ... ... ... ... (12-сурет).
(12-сурет. Add a New Window Type
терезесі)
Ok батырмасын басқан соң Window Properties диалогті ... ... ... құрастырылатын анықтамалық жүйенің негізгі терезісінің басын енгізуіміз керек (13-сурет).
(13-сурет. Window Properties терезесі )
Енді ... ... ... үшін Map батырмасын басамыз. Сонда келесі терезе ... ... Осы ... Add ... бау ... IDH_1 және т.б ... Map ... терезесі)
15-суретте анықтамалық проектісінің мысал терезесі көрсетілген.
(15-сурет. Анықтамалық ... ... ... болған соң, File\Compile әрекетін орындаймыз (16-сурет)
(16-сурет. Compile a Help File ... ... ... соң, ... ... ... аяқталады. Анықтамалықтарды деректер базасымен байланыстырудың әр түрлі әдістері ... ... ... ... ... ... байланысқан.
Мен жасаған деректер базасында 3 анықтамалық қолданылған. 1-кітапхана жайлы мағлұмат, 2-құрастырылған деректер базасын қалай ... ... ... ... - де ... базасын құру жөніндегі қысқаша мағлұматтар.
* деректер базасының құрылысы
деректер базасы 8 формадан тұрады.
1-форма. Деректер базасына ... ... Әр ... ... ... ... ... Негізгі терезе
* Кітапхана жайлы мағлұмат
* Программаны қалай пайдалануға болады?
* Шығу
453390381000
3-форма. Негізгі терезе. Бұл ... ... ... ... ... ... ... және т.б ), сұрау (запрос) жасауға, есептеме (отчет) шығаруға, анықтама шығаруға және программаның авторы жайлы мағлұматтарды алуға мүмкіндігіңіз ... ... ... ... in ... ... in 'Unit2.pas' {Form2},
Unit3 in 'Unit3.pas' {Form3},
Unit4 in 'Unit4.pas' {Form4},
Unit5 in ... ... in ... ... in 'Unit7.pas' {Form7},
Unit8 in 'Unit8.pas' {Form8};
{$R *.res}
begin
Application.Initialize;
Application.CreateForm(TForm1, Form1);
Application.CreateForm(TForm2, Form2);
Application.CreateForm(TForm3, Form3);
Application.CreateForm(TForm4, Form4);
Application.CreateForm(TForm5, Form5);
Application.CreateForm(TForm6, ... ... ... ... ... ... ... Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, jpeg, ExtCtrls;
type
TForm1 = class(TForm)
Panel1: TPanel;
Image1: TImage;
Button1: TButton;
Button2: TButton;
Label1: TLabel;
Edit1: ... ... ... ... ... TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: ... ... ... ... ... ... l=s then ... else
showmessage('Íåâåðíûé ïàðîëü!!!');
end;
end;
procedure TForm1.Button2Click(Sender: TObject);
begin
close;
end;
end.
unit Unit2;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, ... ... ... StdCtrls, ExtCtrls, jpeg;
type
TForm2 = class(TForm)
Panel1: TPanel;
Button1: TButton;
Image1: TImage;
Button2: TButton;
Button3: TButton;
Button4: TButton;
Button5: TButton;
procedure Button2Click(Sender: TObject);
procedure Button3Click(Sender: TObject);
procedure Button5Click(Sender: TObject);
procedure ... ... Private ... ... Public declarations }
end;
var
Form2: TForm2;
implementation
uses Unit3, Unit1;
{$R *.dfm}
procedure TForm2.Button2Click(Sender: TObject);
begin
Form3.show;
end;
procedure TForm2.Button3Click(Sender: TObject);
begin
winhelp(Form2.handle, 'BIBLIO.HLP',HELP_CONTEXT,1);
end;
procedure TForm2.Button5Click(Sender: TObject);
begin
Form1.Show;
end;
procedure TForm2.Button4Click(Sender: TObject);
begin
winhelp(Form2.handle, 'SPRAVOCHNIK.HLP',HELP_CONTEXT,1);
end;
end.
unit ... ... ... ... Classes, ... Controls, Forms,
Dialogs, Menus, jpeg, ExtCtrls, ComObj;
type
TForm3 = class(TForm)
MainMenu1: TMainMenu;
N1: TMenuItem;
N2: TMenuItem;
N3: TMenuItem;
N4: TMenuItem;
N21: ... ... ... ... ... TMenuItem;
N7: TMenuItem;
N8: TMenuItem;
N9: TMenuItem;
Windows1: TMenuItem;
Image1: TImage;
procedure N5Click(Sender: TObject);
procedure ... ... ... ... ... ... N11Click(Sender: TObject);
procedure N22Click(Sender: TObject);
procedure N9Click(Sender: TObject);
procedure Windows1Click(Sender: TObject);
procedure ... ... Private ... ... Public ... ... TForm3;
implementation
uses Unit8, Unit4, Unit5, Unit6, Unit7, Unit1;
{$R *.dfm}
procedure TForm3.N5Click(Sender: TObject);
begin
Form8.show;
end;
procedure ... ... := ... := ... Excel íà ïîëíûé ýêðàí
VExcel.WindowState := -4137;
VExcel.WorkBooks.Open('G:\Otchet.xls');
end;
procedure TForm3.N4Click(Sender: TObject);
begin
Form4.show;
end;
procedure TForm3.N21Click(Sender: TObject);
begin
Form5.show;
end;
procedure ... ... ... ... ... TObject);
begin
showmessage ('Áàçà äàííûõ "Áèáëèîòåêà". Âûïîëíèëà: ñòóäåíòêà ãðóïïû CÈÁ-10-1 Òîéøûáåê À.Í, Ïðîâåðèëà:Æóëäûç Ñàéëàóîâíà ');
end;
procedure TForm3.Windows1Click(Sender: TObject);
begin
winhelp(Form3.handle, 'SPRAVKA.HLP',HELP_CONTEXT,1);
end;
procedure TForm3.N3Click(Sender: TObject);
begin
Form1.show;
end;
end.
unit Unit4;
interface
uses
Windows, ... ... ... Classes, Graphics, Controls, Forms,
Dialogs, DB, DBTables, Grids, DBGrids, ExtCtrls, StdCtrls;
type
TForm4 = class(TForm)
Panel1: TPanel;
Panel2: TPanel;
DBGrid1: TDBGrid;
DataSource1: TDataSource;
Table1: TTable;
Button1: TButton;
procedure Button1Click(Sender: TObject);
private
{ Private ... ... Public ... ... ... Unit3;
{$R *.dfm}
procedure TForm4.Button1Click(Sender: TObject);
begin
Form3.show;
end;
end.
unit Unit5;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, DB, ... Grids, DBGrids, ... ... = ... ... TPanel;
DBGrid1: TDBGrid;
DataSource1: TDataSource;
Table1: TTable;
Button1: TButton;
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form5: TForm5;
implementation
uses Unit3;
{$R *.dfm}
procedure TForm5.Button1Click(Sender: ... ... ... ... ... Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, ExtCtrls, DB, DBTables, Grids, DBGrids;
type
TForm6 = class(TForm)
Panel1: ... ... ... ... ... TLabel;
Button1: TButton;
Button2: TButton;
Button3: TButton;
Button4: TButton;
procedure Button1Click(Sender: TObject);
procedure Button2Click(Sender: TObject);
procedure Button3Click(Sender: TObject);
procedure Button4Click(Sender: TObject);
private
{ Private declarations ... Public ... ... TForm6;
implementation
uses Unit3;
{$R *.dfm}
procedure TForm6.Button1Click(Sender: TObject);
begin
if table1.CanModify=true then
Table1.edit; //ïåðåâîäèì ... â ... ... ... ... ... ... TForm6.Button2Click(Sender: TObject);
begin
Table1.append; //ïåðåâîäèì òàáëèöó â ðåæèì äîáàâëåíèÿ íîâîé çàïèñè
Table1.fieldbyname('FIO avtora').asString:='New value';//ïðèñâàèâàåì çíà/åíèå ïîëåé
Table1.post;//ñîõðàíÿåì ... ... ... ... TObject);
begin
Form3.show;
end;
end.
unit Unit7;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, ExtCtrls, DB, DBTables, Grids, DBGrids;
type
TForm7 = ... ... ... ... TDataSource;
Table1: TTable;
Button1: TButton;
Button2: TButton;
Button3: TButton;
Label1: TLabel;
Button4: TButton;
procedure RadioButton1Click(Sender: TObject);
procedure Button1Click(Sender: TObject);
procedure Button2Click(Sender: TObject);
procedure ... ... Private ... ... Public declarations }
end;
var
Form7: TForm7;
implementation
{$R *.dfm}
procedure TForm7.RadioButton1Click(Sender: TObject);
begin
Table1.Locate('FIO studenta','Fakultet',[loCaseInsensitive]);
end;
procedure TForm7.Button1Click(Sender: TObject);
begin
if ... ... ... ... â ðåæèì ðåäàêòèðîâàíèÿ
Table1.fieldbyname('FIO studenta').asString:='New value';//èçìåíÿåì ïîëå
Table1.post;//ñîõðàíÿåì èçìåíåíèÿ
end else showmessage('Ðåäàêòèðîâàíèå íåâîçìîæíà');
end;
procedure TForm7.Button2Click(Sender: TObject);
begin
Table1.append; //ïåðåâîäèì òàáëèöó â ðåæèì äîáàâëåíèÿ ... ... ... ... çíà/åíèå ïîëåé
Table1.post;//ñîõðàíÿåì èçìåíåíèÿ
end;
procedure TForm7.Button3Click(Sender: TObject);
begin
Table1.Delete;
end;
unit Unit8;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, ... ... ... DB, DBTables, StdCtrls, ExtCtrls, Grids, DBGrids;
type
TForm8 = class(TForm)
Panel1: ... ... ... ... ... ... ... TTable;
Button2: TButton;
procedure Button1Click(Sender: TObject);
procedure Button2Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form8: TForm8;
implementation
uses Unit3;
{$R *.dfm}
procedure ... ... ... Zhanr ');
// Query1.SQL.Add(' from spisok knig ');
// Query1.SQL.Add(' where FName like ''%t%'' ');
Query1.ParamByName('param_letter').AsString := ... ... := ... ... TQuery
end;
procedure TForm8.Button2Click(Sender: TObject);
begin
Form3.show;
end;
end.

Пән: Информатика
Жұмыс түрі: Реферат
Көлемі: 14 бет
Бұл жұмыстың бағасы: 400 теңге









Ұқсас жұмыстар
Тақырыб Бет саны
Delphi программалау ортасы туралы10 бет
Операторлар және ішкі программалар (Delphi программалау ортасы)22 бет
Delphi тілінде деректер модулін құрастыру және оны пайдалану20 бет
«Теміржолдық касса» мәліметтер базасы95 бет
Тараз мемлекеттік университетінің «Компьютерлік жүйелер» кафедрасының оқытатын пәндері мен оқытушылары және білімгері туралы ақпаратты реттеу, жеделдетіп өңдеу жене қажетті ақпаратты тездетіп алу үшін деректер қорын құру64 бет
Activ studio жалпы мағлұмат70 бет
Mathcad математикалық пакеті4 бет
«Кітапхана бөлімінің Мәліметтер Базасын құру(ұйымдастыру)»15 бет
Абайдың қоғамдық қызметі22 бет
Автоматтандырылған ақпараттық ресурс орталығы72 бет


Исходниктер
Пәндер
Көмек / Помощь
Арайлым
Біз міндетті түрде жауап береміз!
Мы обязательно ответим!
Жіберу / Отправить


Зарабатывайте вместе с нами

Рахмет!
Хабарлама жіберілді. / Сообщение отправлено.

Сіз үшін аптасына 5 күн жұмыс істейміз.
Жұмыс уақыты 09:00 - 18:00

Мы работаем для Вас 5 дней в неделю.
Время работы 09:00 - 18:00

Email: info@stud.kz

Phone: 777 614 50 20
Жабу / Закрыть

Көмек / Помощь