Кітапханашының жұмысын автоматтандыру
Мазмұны
1. Кіріспе
Автоматтандыру дегеніміз не?..........................................................................2
2. Негізгі бөлім
Кітапхананы басқару жұмысын автоматтандыру туралы.............................3
3. Жазулар ( мысал )..............................................................................................9
4. Есептің ( программаның
5. Қорытынды
Автоматтандыру – басқару жүйесінің тиімді
6. Қолданған әдебиеттер тізімі…………………………………………………17
Кіріспе
Автоматтандыру дегеніміз не?
Автоматтандыру , технологиялық қолдану
Автоматтандырылады :
1) технологиялық , энергетикалық ,
2) өнеркәсіп , жоспарлау және
3) ғылыми іздеулер , медициналық
Автоматтандыру – ғылыми функциялық
Автоматикалық басқару ХIХ
Подсистема техникалық есептеуі комплекстік
Подсистема ақпараттық жүйесіне сырттай ақпараттармен қамтамасыз
Негізгі бөлім
Кітапхананы басқару жұмысын автоматтандыру туралы.
Басқаруды автоматтандыру теориясығылыми дисциплина, сабақты
математикалық модельдеу болып табылады.
Басқаруды автоматтандыру теориясымен бірге қосылған функционалдық
және оны шеше білуімен байланысты.
Шамамен ХХ
Қазіргі уақытта басқаруды автоматтандыру
тоериялы жүйесін
ғылыми техникалық прогрестің
Осы заманға
Автоматтандыруды , яғни
көзқарастардың әсерінен , ірі кітапханалық –
Автоматтандырудың енгізілуі технологиялық
Автоматтандырудың әсерінен әрқашан
Қарапайым мысал ретінде өзіміздің
барысын автоматтандырылуын
Т. Рысқұлов атындағы
1994 жылдан бастап кітапхана
Мерзімді басылымдарды
болады.
Бірінші блок – қордың
Екінші блок – қосымша және
Үшінші блок – кітапханалық –
Барлық бөлімдер бірыңғай анықтамалық – ақпарат
“ РАБИС” кітапханалық – ақпарат
Бағдарламасы мемлекетіміздегі 50-ден астам кітапханаларында
Кітапхана жүйесінің
Барша экономикалы процестерді
( 1993 – 2001
өндіріске қатысты
Бұл ақпараттарсыз басқарушылар
ақпаратпен толық мөлшерде қамтамасыз ету;
техника жағынан жабдықтау;
праграмалау мен математикалық жағынан көмен;
методтық қанағаттандыру;
ұйымды жарақтандыру;
3.Жазулар (мысал)
Саны шекті , әр түрлі типті
< Тип аты >= record
< Өріс тізімі >
еnd;
< Өріс тізімі > - өріс
Төмендегі мысалда 5 өрісі бар. TStudent
Type
TSudent = record
Fam: string [20];
Sex: Boolean;
Date: string [8] ;
Kurs: byte;
End;
VAR Student : TStudent;
Жазба айнымалысын тікелей сипаттауға да болады:
VAR
Student= record
Fam: string [20];
Sex:Boolean;
Date: string [8];
Kurs:byte;
End;
Жазбаның кез келген өрісін көрсету үшін
Student. Fam:=’Калимов А.Е.’;
Student. Sex:= true;
Student. Date:= “02.11.83.’;
Student. Kurs:=1;
Программалауда with операторының
With Student do
Begin
Fam:=’Калимов А.Е.’;
Sex:=true;
Date:=’02.11.83.”;
Kurs:=1;
End;
Турбо Паскальда нұсқалы өрістері бар жазбаларды
және оны пайдаланудың ьысалы:
VAR
Colon=record
Case k: byte of
1: ( int:0..20);
2: ( sim:char);
3: ( Mass: array [1..10] of
4: ( STR: string [15]);
end;
begin;
.. .. ..
Colon. k:=1; Colon.int:=10;
Colon. k:=2; Colon.sim:=’z’;
Colon. k:=3; Colon.mas[1]:=2000;
Colon. k:=4; Colon.str:=’Pascal’;
.. .. ..
End.
5. Қорытынды бөлім
Қорыта келгенде , соңғы
Жоғарыда аталған мәселелерді негізге
шерде қамтамасыз ету , толық
жүзеге асыру . Осы
Бұл системаны қолданған
Program Libruary; uses crt;
Tyre
Biblioteka=record;
1)Shifr:integer[15]; (шифр)
2)Book name:string[30]; (кітап аты)
3)Book data:integer; (кітап.ш.жылы)
4)Book page:integer; (қанша парақтан тұрады)
5)Book language:string[3]; (кітап.тілі)
6)Aftor:string[25]; (автор книги фамилия)
End;
Var
K,N,M,D:integer;
St:string[50];
c:array [1..200] of biblioteka;
Begin
clrscr
Write (‘scolko vvesti zapisey n=’);
Readln (n);
For k:=1 to n do
Begin
Write c [k] do
Begin
Write (‘kod=’);
Read (shifr);
Write(‘Fio=’);
Read( aftor);
Write (‘kitaptin ati=’);
Read (book’s name);
Write(‘data=’);
Read(book’s data);
Write (‘kitaptin tili=’);
Read (bokk’s language);
Write (‘kitaptin beti=’)
Read(book’s page);
End;end;
End.
Clrscr;
Writeln (‘vvedite rezim poiska 1:kod, 2:Fio,
Case M of
1:Begin
Writeln (‘ vvedite kod’);
Readln (D);
For k:=1 to n do
Begin
With c[k] do
Begin if D= shifr then
Begin
Writeln (shifr);
Writeln (aftor);
Writeln (Book’s name);
Writeln (book’s data);
Writeln (book’s language);
Writeln (book’s page);
End;End;End;End;
2: Begin
Writeln (‘vedite Fio=’);
Readln (st);
For k:=1 to n do
Begin
With c[k] do
Begin
if st=aftor then
Begin
Writeln (shifr);
Writeln (aftor);
Writeln (Book’s name);
Writeln (book’s data);
Writeln (Book’s language);
Wirteln (book’s page);
End;end;end;end;
3:Begin
writeln (‘vvedite kitaptin ati=’);
readln (st);
for k:=1 to n do
begin
with c[k] do
begin
if st=book’s name then
begin
writeln (shifr);
writeln (aftor);
writeln (book’s name);
writeln (book’s data);
writeln (book’s language);
wirteln (book’s page);
end;end;end;end;
4:Begin
writeln (‘vvedite b data=’);
readln (D);
for k:=1 to n do
Begin
With c[k] do
Begin
If D=book’s data then
Begin
Writeln (shifr);
Writeln (aftor);
Writeln (book’s name);
Writeln (book’s data);
Writeln (book’s language);
Writeln (book’s page);
End;end;end;end;
5:Begin
writeln (‘vvedite kitaptin tili=’);
readln (st);
for k:=1 to n do
Begin
With c[k] do
Begin
If st=book’s language then
Begin
Writeln (shifr);
Writeln (aftor);
Writeln (book’s name);
Writeln (book’s data);
Writeln (book’s language);
Writeln (book’s page);
End;end;end;end;
6:Begin
writeln (vvedite kitaptin beti=’);
readln (D);
for k:=1 to n do
Begin
With c[k] do
Begin
If D=book’s page then
Begin
Writeln (shifr);
Writeln (aftor);
Writeln (book’s name);
Writeln (book’s data);
Writeln (book’s language);
Writeln (book’s page);
End;end;end;end;
End;end.
Mұндағы:
Chifr= Шифр , код
FA= Автар фамилиясы
Name book= Кітап аты
Jili= Жылы
Language= Тілі
Bet sani= Бет саны , парағы
Adebiet turi= Әдебиет түрі
Шифр: 1111
1112
1113
1114
Әдебиет түрі: Художественный
Роман
Роман-эпопея
Тарихи
Мәдени
Фамилия: Манасов
Мұқанов
Әуезов
Толстой
Пушкин
Кәтап аты: Turbo
Ботагоз
Абай жолы
Война и мир
Сборник стихов
Жылы: 2004
1996
1991
1887
1893
Бет саны :
360
450
400
250
Тілі:
Қазақша
Қазақша
Орысша
Орысша
6. Әдебиеттер тізімі
Н.Культин “ Turbo Pascal в
2000.
2. Ж.Қ.Масанов , Б.А.Бельгимбаев ,
“ Turbo Pascal ”
3. “ Автоматизация асновных
процессов в крупной библиотеке ”
“ Автоматизация проектирования систем управления ”
Сборник - статей - Москва
“ Автоматизация систем управления ” 1,2
Москва,1972.
“ Автоматизированные системы управления ”
Международный сборник – “ Ленинград”.
Информационно – поисковый тезаурус по информатике.-
1987.
8. Шепитько В.Ю.Криминалистика. Энциклопедия словник.
2001.
9. Лавренова О.А. Методика разработки
тезауруса. М.Поликов , 2001.
Шемакин Ю.И. Автоматизация системы управления библиотекаря
М.Воениздат , 1974.
11. ИНТЕРНЕТ.