Қорытынды

Әдістемелік нұсқау жалпы оқу жүйесіне қойылатын талаптарға сәйкес жасалады, ал оның ақпараттық-әдістемелік негізін жоғарыда айтылған материалдар құрайды. Ол алдын ала жоба бойынша анықталған компьютерлік технология негізінде жасалған білім беру мәселелерін шешіп, оқыту-үйрету функциялары мен оқу процесін басқару істерін жүзеге асыруы тиіс.

Оқыту бағдарламасын құру барысында қазіргі информациялық технологиялар ұсынатын барлық технологиялық құралдар арсеналын қолдану өте маңызды.

Компьютерлік оқу құралын жасаудың ақырғы кезеңі оны программаға айналдыру, яғни машина тілінде кодтау ісі болып табылады. Болашақ мамандығым бағдарламашы болғандықтан дипломдық жұмыста «Кәсіптік қазақ тілі» пәнінен әдістемелік нұсқау жүйесін жасауды дұрыс деп шештім. Себебі қазіргі кезде ақпараттық, ғылыми технологиялардың даму кезеңі. Ал компьютердің маңызы осыған байланысты артуда. Білім ордалары да компьютермен қамтылғандықтан, әдістемелік нұсқау жүйелері жиі қолданылып жатыр. Әдістемелік нұсқау жүйесі адамға тартымды әрі қызығушылығын оятарлықтай болуы керек.

Бұл әдістемелік нұсқау жүйесін жасау барысында мен үлкен ізденісте болдым. Тек оқулықты жасай ғана қоймай, өзім де жаңа ақпараттарды игердім.

Оқулықты жасау мен үшін өте қызықты болды. Себебі бұл оқулыққа бар күшімді, идеямды салдым. Осы әдістемелік нұсқау жүйесін жасаумен шектелмей, әлі де бұдан қызықты, күрделі оқулықтарды жасаймын деген ойдамын. Бұл оқулықты колледжде Есептеуіш техникасы және бағдарламамен қамтамасыз ету мамандығының студентері мен осы тақырыпқа қызығушылық тудырған басқа да пайдаланушылар өздеріне қажетті нәрселерді алады деген ойдамын.

Қолданылған әдебиеттер тізімі

1. Назарбаев Н. Бәсекелестікке қабілетті Қазақстан үшін. Бәсекелестікке қабілетті экономика үшін. Бәсекелестікке қабілетті халық үшін. Қазақстан халқына жолдауы.– Астана: Ақорда KZ 62012.

2. Қасым Б., Османова З. т.б. Кәсіби қазақ тілі. –Алматы, 2010. –112 б.

3. Күзекова З. Қазақ тілі. – Алматы, 2001.

4. Қадашева Қ. Жаңаша жаңғыртып оқытудың ғылыми әдiстемелiк негiздерi: өзгетiлдi дәрiсханалардағы қазақ тiлi: Пед. ғыл. док. … дисс. – Алматы, 2001. – 301 б.

5. Культин Н.Б. Delphi 6. Программирование на Object Pascal. СПб: БХВ - Петербург, 2002.

6. Фаронов В. Delphi 6: учебный курс. – СПб.:Питер, 2002. - 512 с.

7. Борк A "История" новых технологий в образовании / Российский открытый университет - М., 1990.

8. Брановский Ю.С. Введение в педагогическую информатику. - Ставрополь: СГПУ, 1995.

9. Кузнецов А.А. Сергеева Т.А. Компьютерная программа и дидактика // Информатика и образование. - 1986. - N 2.

10. Мирская А, Сергеева Т. Обучающие программы оценивает практика // Информатика и образование. 1987. - 6.

11. Немнюгин С.А. Turbo Pascal. Программирование на языке высокого уровня. – СПб.:Питер, 2008.

12. Технология сертификации программных средств учебного назначения (ПС УН) / Рос. центр информатизации образования (РОСЦИО) / Под редакцией А.И. Галкина, В.К. Мороз. - М., 1993.

13. Л.Х. Зайнутдинова. Создание и применение электронных учебников. Астрахань, ООО "ЦНТЭП", 1999, с. 364.

14. С.А. Христочевский. Информатизация образования. Почему так медленно? Информатика и образование, 1997,

15. С.А. Христочевский. Мультимедиа в образовании. Проблемы разработки и использования. Системы и средства информатики. Вып.8. М.: Наука. Физматлит, 1996, стр.166-176.

16. Б.Е. Алгинин, Б.Г. Киселев и др. Концепция информатизации образования. Информатика и образование, 1990, 1.

17. Немов Р.С. Психология: Учеб. пособие для учащихся пед. ин-тов и работников системы подготовки, повышения квалификации и переподготовки пед. кадров. -- М.: Просвещение, 1990. -- 301 с.

18. Орлов М.А. «Основы классической ТРИЗ Практическое руководство для изобретательного мышления», Москва, 2005. - 416с.

19. Пак Н.И. Нелинейные технологии обучения в условиях информатизации: Учебное пособие. Красноярск: РИО КГПУ, 2004

20. З.Күзекова, Г. Қарақұсова Жоғарғы оқу орындарының эканомика факультеттеріне арналған. А.1997,1999.

21. Ш.Б Сейтова. Ана тілің –асыл қазынаң. Семей 2001.

22. Т.Т Аяпова. Қазақ тілі. Негізгі оқулық

23. Т.Т.Аяпова Қазақ тілі. Үй кітабы

24. Ш.Б.Бектұров. Т.Ш. Бектұрова. Қазақ тілі. А. 2002.

25. Қазақ тілі сөздігі. А. 1999 ҰТА

26. Ә. Болғамбаев. Қазақ тілінің синонимдік сөздігі. А.1976.

27. Б.Шалабай, В.Салагаев. Іс қағаздары. А. 2001.

28. Базарғалиева Б., Иманбаева М., Ибрагимов Қ. Қазақ тілі. Алматы, 2005.

29. Г.Қ Рысбаева. Қазақ тілі грамматикалық анықтағыш А-2000

30. З.Күзекова . Практикалық курс. Қазақ тілі –Алматы: 2002

31. Ш.Бектұров. Серғалиев М. Қазақ тілі А-1994

32. Жас техниктің энциклопедиялық сөздігі. Москва.1980.

33. Р. Сыздық Қазақ тілінің анықтағышы Астана, Елорда 2000.

ҚОСЫМША

Листинг1. Титулды бет

unit Unit2;

interface

uses

Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,

Dialogs, jpeg, ExtCtrls, shellapi,Buttons, StdCtrls;

type

TForm2 = class(TForm)

Image1: TImage;

SpeedButton1: TSpeedButton;

SpeedButton2: TSpeedButton;

SpeedButton3: TSpeedButton;

SpeedButton4: TSpeedButton;

SpeedButton5: TSpeedButton;

SpeedButton6: TSpeedButton;

SpeedButton7: TSpeedButton;

Label1: TLabel;

Panel1: TPanel;

Label2: TLabel;

Label3: TLabel;

procedure FormCreate(Sender: TObject);

procedure SpeedButton1Click(Sender: TObject);

procedure SpeedButton8Click(Sender: TObject);

procedure SpeedButton2Click(Sender: TObject);

procedure SpeedButton7Click(Sender: TObject);

procedure SpeedButton3Click(Sender: TObject);

procedure SpeedButton5Click(Sender: TObject);

procedure SpeedButton4Click(Sender: TObject);

procedure SpeedButton6Click(Sender: TObject);

procedure Label3Click(Sender: TObject);

procedure Label1Click(Sender: TObject);

procedure Label2Click(Sender: TObject);

private

{ Private declarations }

public

{ Public declarations }

end;

var

Form2: TForm2;

implementation

uses Unit1, Unit3, Unit4, Unit5, Unit6, Unit7, Unit8, Unit14;

{$R *.dfm}

procedure TForm2.FormCreate(Sender: TObject);

begin

Form2.Width:=1000;

form2.Height:=600;

image1.Width:=997;

image1.Height:=595;

end;

procedure TForm2.SpeedButton1Click(Sender: TObject);

begin

application.Terminate;

end;

procedure TForm2.SpeedButton8Click(Sender: TObject);

begin

form2.Hide;

form1.show;

end;

procedure TForm2.SpeedButton2Click(Sender: TObject);

begin

form2.Hide;

form3.Show;

end;

procedure TForm2.SpeedButton7Click(Sender: TObject);

begin

form2.Hide;

form4.Show;

end;

procedure TForm2.SpeedButton3Click(Sender: TObject);

begin

form2.Hide;

form5.show;

end;

procedure TForm2.SpeedButton5Click(Sender: TObject);

begin

form2.Hide;

form6.show;

end;

procedure TForm2.SpeedButton4Click(Sender: TObject);

begin

form2.Hide;

form7.show;

end;

procedure TForm2.SpeedButton6Click(Sender: TObject);

begin

ShellExecute(handle, nil, PChar(ExtractFilePath(ParamStr(0))+'/123456/MyTestStudent.exe'), nil, nil, SW_SHOWNORMAL);

end;

procedure TForm2.Label3Click(Sender: TObject);

begin

form2.Hide;

form8.show;

end;

procedure TForm2.Label1Click(Sender: TObject);

begin

Panel1.Visible:=True;

SpeedButton2.Visible:=True;

SpeedButton3.Visible:=True;

SpeedButton4.Visible:=True;

SpeedButton5.Visible:=True;

SpeedButton6.Visible:=True;

SpeedButton7.Visible:=True;

end;

procedure TForm2.Label2Click(Sender: TObject);

begin

form2.Hide;

form14.show;

end;

end.

Листинг2. Негізгі бет (негізгі оқиғалар)

procedure TForm2.FormCreate(Sender: TObject);

begin

Form2.Width:=1000;

form2.Height:=600;

image1.Width:=997;

image1.Height:=595;

end;

procedure TForm2.SpeedButton1Click(Sender: TObject);

begin

application.Terminate;

end;

procedure TForm2.SpeedButton8Click(Sender: TObject);

begin

form2.Hide;

form1.show;

end;

procedure TForm2.SpeedButton2Click(Sender: TObject);

begin

form2.Hide;

form3.Show;

end;

procedure TForm2.SpeedButton7Click(Sender: TObject);

begin

form2.Hide;

form4.Show;

end;

procedure TForm2.SpeedButton3Click(Sender: TObject);

begin

form2.Hide;

form5.show;

end;

procedure TForm2.SpeedButton5Click(Sender: TObject);

begin

form2.Hide;

form6.show;

end;

procedure TForm2.SpeedButton4Click(Sender: TObject);

begin

form2.Hide;

form7.show;

end;

procedure TForm2.SpeedButton6Click(Sender: TObject);

begin

ShellExecute(handle, nil, PChar(ExtractFilePath(ParamStr(0))+'/123456/MyTestStudent.exe'), nil, nil, SW_SHOWNORMAL);

end;

procedure TForm2.Label3Click(Sender: TObject);

begin

form2.Hide;

form8.show;

end;

procedure TForm2.Label1Click(Sender: TObject);

begin

Panel1.Visible:=True;

SpeedButton2.Visible:=True;

SpeedButton3.Visible:=True;

SpeedButton4.Visible:=True;

SpeedButton5.Visible:=True;

SpeedButton6.Visible:=True;

SpeedButton7.Visible:=True;

end;

procedure TForm2.Label2Click(Sender: TObject);

begin

form2.Hide;

form14.show;

end;

end.

Листинг3. Теориялық бөлім (негізгі оқиғалар)

procedure TForm3.FormCreate(Sender: TObject);

begin

Form3.Width:=1220;

form3.Height:=600;

image1.Width:=1217;

image1.Height:=595;

end;

procedure TForm3.SpeedButton2Click(Sender: TObject);

begin

form3.Hide;

form2.show;

end;

procedure TForm3.Label1Click(Sender: TObject);

begin

panel2.Visible:=false;

panel1.Visible:=true;

webbrowser1.Navigate(getcurrentdir+'\123\1.html');

end;

procedure TForm3.Label3Click(Sender: TObject);

begin

panel2.Visible:=false;

panel1.Visible:=true;

webbrowser1.Navigate(getcurrentdir+'\123\2.html');

end;

procedure TForm3.Label4Click(Sender: TObject);

begin

panel2.Visible:=false;

panel1.Visible:=true;

webbrowser1.Navigate(getcurrentdir+'\123\3.html');

end;

procedure TForm3.Label5Click(Sender: TObject);

begin

panel2.Visible:=false;

panel1.Visible:=true;

webbrowser1.Navigate(getcurrentdir+'\123\5.html');

end;

procedure TForm3.Label6Click(Sender: TObject);

begin

panel2.Visible:=false;

panel1.Visible:=true;

webbrowser1.Navigate(getcurrentdir+'\123\7.html');

end;

procedure TForm3.Label7Click(Sender: TObject);

begin

panel2.Visible:=false;

panel1.Visible:=true;

webbrowser1.Navigate(getcurrentdir+'\123\4.html'); end;

procedure TForm3.Label8Click(Sender: TObject);

begin

panel2.Visible:=false;

panel1.Visible:=true;

webbrowser1.Navigate(getcurrentdir+'\123\6.html');

end;

procedure TForm3.Label9Click(Sender: TObject);

begin

panel2.Visible:=false;

panel1.Visible:=true;

webbrowser1.Navigate(getcurrentdir+'\123\8.html');

end;

procedure TForm3.Label2Click(Sender: TObject);

begin

panel2.Visible:=false;

panel1.Visible:=true;

webbrowser1.Navigate(getcurrentdir+'\123\9.html');

end;

procedure TForm3.Label10Click(Sender: TObject);

begin

panel2.Visible:=false;

panel1.Visible:=true;

webbrowser1.Navigate(getcurrentdir+'\123\10.html');

end;

procedure TForm3.Label11Click(Sender: TObject);

begin

panel2.Visible:=false;

panel1.Visible:=true;

webbrowser1.Navigate(getcurrentdir+'\123\11.html');

end;

procedure TForm3.Label12Click(Sender: TObject);

begin

panel2.Visible:=false;

panel1.Visible:=true;

webbrowser1.Navigate(getcurrentdir+'\123\12.html');

end;

procedure TForm3.Label13Click(Sender: TObject);

begin

panel2.Visible:=false;

panel1.Visible:=true;

webbrowser1.Navigate(getcurrentdir+'\123\13.html');

end;

procedure TForm3.Label14Click(Sender: TObject);

begin

panel2.Visible:=false;

panel1.Visible:=true;

webbrowser1.Navigate(getcurrentdir+'\123\14.html');

end;

procedure TForm3.Label15Click(Sender: TObject);

begin

panel2.Visible:=false;

panel1.Visible:=true;

webbrowser1.Navigate(getcurrentdir+'\123\15.html');

end;

end.

Листинг4. Практикалық бөлім (негізгі оқиғалар)

procedure TForm5.FormCreate(Sender: TObject);

begin

Form5.Width:=690;

form5.Height:=590;

image1.Width:=687;

image1.Height:=585;

end;

procedure TForm5.SpeedButton2Click(Sender: TObject);

begin

form5.Hide;

form2.show;

end;

procedure TForm5.SpeedButton3Click(Sender: TObject);

begin

form5.Hide;

form9.show;

end;

procedure TForm5.SpeedButton4Click(Sender: TObject);

begin

form5.Hide;

form10.show;

end;

procedure TForm5.SpeedButton5Click(Sender: TObject);

begin

form5.Hide;

form1.show;

end;

procedure TForm5.SpeedButton6Click(Sender: TObject);

begin

form5.Hide;

form11.show;

end;

procedure TForm5.SpeedButton7Click(Sender: TObject);

begin

form5.Hide;

form12.show;

end;

procedure TForm5.SpeedButton8Click(Sender: TObject);

begin

form5.Hide;

form13.show;

end;

end.

Листинг5. Мамандығым – мақтанышым (негізгі оқиғалар)

procedure TForm9.SpeedButton1Click(Sender: TObject);

begin

form9.Hide;

form5.show;

end;

procedure TForm9.FormCreate(Sender: TObject);

begin

ShockwaveFlash1.Movie:=extractfilepath(application.ExeName)+'K11M1G.swf';

end;

end.

Листинг6. Қазақстанның даму стратегиясы (негізгі оқиғалар)

procedure TForm10.SpeedButton1Click(Sender: TObject);

begin

form10.Hide;

form5.show;

end;

procedure TForm10.FormCreate(Sender: TObject);

begin

ShockwaveFlash1.Movie:=extractfilepath(application.ExeName)+'K11M2G.swf';

end;

end.

Листинг7. Қазақстан Парламенті (негізгі оқиғалар)

procedure TForm1.FormCreate(Sender: TObject);

begin

ShockwaveFlash1.Movie:=extractfilepath(application.ExeName)+'K11M3G.swf';

end;

procedure TForm1.SpeedButton1Click(Sender: TObject);

begin

form1.Hide;

form5.show;

end;

end.

Листинг8. Қазақ өнері. Театрға саяхат (негізгі оқиғалар)

procedure TForm11.SpeedButton1Click(Sender: TObject);

begin

form11.Hide;

form5.show;

end;

procedure TForm11.FormCreate(Sender: TObject);

begin

ShockwaveFlash1.Movie:=extractfilepath(application.ExeName)+'K11M4G.swf';

end;

end.

Листинг9. Біздің еліміздегі оқу жүйесі (негізгі оқиғалар)

procedure TForm12.SpeedButton1Click(Sender: TObject);

begin

form12.Hide;

form5.show;

end;

procedure TForm12.FormCreate(Sender: TObject);

begin

ShockwaveFlash1.Movie:=extractfilepath(application.ExeName)+'K11M5G.swf';

end;

end.

Листинг10. Қазақстанның көрікті жері (негізгі оқиғалар)

procedure TForm13.SpeedButton1Click(Sender: TObject);

begin

form13.Hide;

form5.show;

end;

procedure TForm13.FormCreate(Sender: TObject);

begin

ShockwaveFlash1.Movie:=extractfilepath(application.ExeName)+'K10M5G.swf';

end;

end.

Листинг11. Бейне (негізгі оқиғалар)

procedure TForm7.FormCreate(Sender: TObject);

begin

Form7.Width:=700;

form7.Height:=600;

image1.Width:=697;

image1.Height:=595;

end;

procedure TForm7.Label2Click(Sender: TObject);

begin

ShellExecute(handle, nil, PChar(ExtractFilePath(ParamStr(0))+'\12345\Основы Delphi.mp4'), nil, nil, SW_SHOWNORMAL);

end;

procedure TForm7.SpeedButton2Click(Sender: TObject);

begin

form7.Hide;

form2.show;end;

procedure TForm7.SpeedButton3Click(Sender: TObject);

begin

ShellExecute(handle, nil, PChar(ExtractFilePath(ParamStr(0))+'\12345\Акпарат угымы.mp4'), nil, nil, SW_SHOWNORMAL);

end;

procedure TForm7.SpeedButton4Click(Sender: TObject);

begin

ShellExecute(handle, nil, PChar(ExtractFilePath(ParamStr(0))+'\12345\кауипсиздик ережесі.mp4'), nil, nil, SW_SHOWNORMAL);

end;

procedure TForm7.SpeedButton5Click(Sender: TObject);

begin

ShellExecute(handle, nil, PChar(ExtractFilePath(ParamStr(0))+'\12345\Операциялык жуйе.mp4'), nil, nil, SW_SHOWNORMAL);

end;

procedure TForm7.SpeedButton11Click(Sender: TObject);

begin

ShellExecute(handle, nil, PChar(ExtractFilePath(ParamStr(0))+'\12345\Windows XP ди компьютерге орнату.mp4'), nil, nil, SW_SHOWNORMAL);

end;

procedure TForm7.SpeedButton7Click(Sender: TObject);

begin

ShellExecute(handle, nil, PChar(ExtractFilePath(ParamStr(0))+'\12345\Компьютер алдында дурыс отыру.mp4'), nil, nil, SW_SHOWNORMAL);

end;

procedure TForm7.SpeedButton8Click(Sender: TObject);

begin

ShellExecute(handle, nil, PChar(ExtractFilePath(ParamStr(0))+'\12345\Компьютер гимнастикасы.mp4'), nil, nil, SW_SHOWNORMAL);

end;

procedure TForm7.SpeedButton9Click(Sender: TObject);

begin

ShellExecute(handle, nil, PChar(ExtractFilePath(ParamStr(0))+'\12345\Компьютерге драйвер орнату.mp4'), nil, nil, SW_SHOWNORMAL);

end;

procedure TForm7.SpeedButton10Click(Sender: TObject);

begin

ShellExecute(handle, nil, PChar(ExtractFilePath(ParamStr(0))+'\12345\Компьютерге казак тилин косу.mp4'), nil, nil, SW_SHOWNORMAL);

end; end.

Листинг12. Презентациялар (негізгі оқиғалар)

procedure TForm6.FormCreate(Sender: TObject);

begin

Form6.Width:=1200;

form6.Height:=600;

image1.Width:=1197;

image1.Height:=595;

end;

procedure TForm6.SpeedButton9Click(Sender: TObject);

begin

form6.Hide;

form2.show;

end;

procedure TForm6.SpeedButton1Click(Sender: TObject);

begin

ShellExecute(handle, nil, PChar(ExtractFilePath(ParamStr(0))+'\1234\Дербес компьютер.ppt'), nil, nil, SW_SHOWNORMAL);

end;

procedure TForm6.SpeedButton2Click(Sender: TObject);

begin

ShellExecute(handle, nil, PChar(ExtractFilePath(ParamStr(0))+'\1234\Жалгаулар тури.ppt'), nil, nil, SW_SHOWNORMAL);

end;

procedure TForm6.SpeedButton3Click(Sender: TObject);

begin

ShellExecute(handle, nil, PChar(ExtractFilePath(ParamStr(0))+'\1234\Стиль турлери.ppt'), nil, nil, SW_SHOWNORMAL);

end;

procedure TForm6.SpeedButton4Click(Sender: TObject);

begin

ShellExecute(handle, nil, PChar(ExtractFilePath(ParamStr(0))+'\1234\Есептеуиш техникасынын даму тарихы.ppt'), nil, nil, SW_SHOWNORMAL);

end;

procedure TForm6.SpeedButton5Click(Sender: TObject);

begin

ShellExecute(handle, nil, PChar(ExtractFilePath(ParamStr(0))+'\1234\Создание кроссворда в MS Word.ppt'), nil, nil, SW_SHOWNORMAL);

end;

procedure TForm6.SpeedButton6Click(Sender: TObject);

begin

ShellExecute(handle, nil, PChar(ExtractFilePath(ParamStr(0))+'\1234\презентация word.ppt'), nil, nil, SW_SHOWNORMAL);

end;

procedure TForm6.SpeedButton7Click(Sender: TObject);

begin

ShellExecute(handle, nil, PChar(ExtractFilePath(ParamStr(0))+'\1234\Фразеологизмдер.ppt'), nil, nil, SW_SHOWNORMAL);

end;

procedure TForm6.SpeedButton8Click(Sender: TObject);

begin

ShellExecute(handle, nil, PChar(ExtractFilePath(ParamStr(0))+'\1234\Кирме создер.ppt'), nil, nil, SW_SHOWNORMAL);

end;

procedure TForm6.SpeedButton11Click(Sender: TObject);

begin

ShellExecute(handle, nil, PChar(ExtractFilePath(ParamStr(0))+'\1234\Акпараттын олшем бирилктери.ppt'), nil, nil, SW_SHOWNORMAL);

end;

procedure TForm6.SpeedButton12Click(Sender: TObject);

begin

ShellExecute(handle, nil, PChar(ExtractFilePath(ParamStr(0))+'\1234\Диалект жане касиби создер.ppt'), nil, nil, SW_SHOWNORMAL);

end; end.

Листинг13. Сөздік (негізгі оқиғалар)

procedure TForm4.FormCreate(Sender: TObject);

begin

Form4.Width:=800;

form4.Height:=600;

image1.Width:=797;

image1.Height:=595;

WebBrowser1.Navigate(GetCurrentDir+'\123\sozdik.html');

end;

procedure TForm4.SpeedButton2Click(Sender: TObject);

begin

form4.Hide;

form2.show;

end;end.

Листинг14. Тест (негізгі оқиғалар)

procedure TForm2.SpeedButton6Click(Sender: TObject);

begin

ShellExecute(handle, nil, PChar(ExtractFilePath(ParamStr(0))+'/123456/MyTestStudent.exe'), nil, nil, SW_SHOWNORMAL);

end; end.

Листинг15. Авторлар ұжымы (негізгі оқиғалар)

procedure TForm8.SpeedButton2Click(Sender: TObject);

begin

form8.Hide;

form2.show;

end;

Листинг16. Пайдаланушыға нұсқау (негізгі оқиғалар)

procedure TForm14.SpeedButton1Click(Sender: TObject);

begin

form14.Hide;

form2.show;

end; end.

1*Қасым Б., Османова З.

Кәсіби қазақ тілі.

2 Object Pascal. СПб: БХВ - Петербург, 2002.

94