Автор работы: Пользователь скрыл имя, 09 Апреля 2014 в 10:19, курсовая работа
Программалау тілдерінің саны көп болуына байланысты олардың біршене классификациясы бар. Оның ішінде негізгі 2 түрге: фукционалдық мәніне (қызметі) және қолданылатын программалау технологиясына байланысты бөлінеді. Программалау тілдері фукнционалдық мәніне байланысты 4 үлкен классқа бөлінеді:
1) программалауға үйретуші;
2) жалпы мәнді;
3) проблемалық-бағытталған;
4) параллель программалаушы.
Қазіргі жоғары деңгейлі тілдерді осы классификацияға сәйкес қарастырамыз.
КІРІСПЕ....................................................................................................................2
ПРОГРАММАЛАУ ТЕХНОЛОГИЯЛАР.............................................................3
ОБЪЕКТІ – БАҒЫТТАЛҒАН ПРОГРАММАЛАУ.............................................4
ЛОГИКАЛЫҚ ПРОГРАММАЛАУ.......................................................................5
КӨМЕКШІ БАҒДАРЛАМАЛАР...........................................................................6
ҚОРЫТЫНДЫ.......................................................................................................22
ПАЙДАЛАНЫЛҒАН ӘДЕБИЕТТЕР.................................................................23
PROCEDURE Inp;
Begin For K:=1 To N Do
For I:= To K Do Begin Read(B[I,K]);
B[I,K]:= B[I,K]; End; End;
PROCEDURE Out;
Begin For K:=1 To N Do Begin
For I:= To K Do Begin Read(B[I,K]:4);
Write; End; End;
Begin Clrscr; (негізгі программа)
Write(‘Матрица өлшемін егіз:’); Readln (N);
Inp; Out;
Write (‘Қай планетадан шықты, номерін енгіз:’); Readln (X);
If=[X]; A[1]:=X; C:=x; D:=0;
For I:=1 To N-1 Do Begin Min:=Maxint; Y:=1;
For K:=1 To N Do
If (B[X,K]) 0) Then
Begin Min:=B[X,K]; Y:=K; End;
D:=D+Min; M:=M+[Y];
A[I+1]:=Y; X:=Y End;
Writeln (‘корабльдің барлық жүрген жолы:’D+B[C,X]);
Write(‘Корабльдің ең тиімді
For K:=1 To N Do Write (A[K]:4); Write (‘ ‘,C);
Readln End.
«Жүргізушілерге картотека жазу» программасын
процедуралар қолданып құру.
PROGRAM Dosye;
TYPE Dos=RECORD A:Char; Integer; C,D,E:String; End;
VAR X:Array[1..10] Of Dos; B,K,I:Integer;
Procedure Inp;
Begin Writeln (K, ‘машина туралы деректерді еңгіз’);
With X [K] Do Begin
Write (‘Қаласы:’); Readln(A);
Write (‘машина нөмірі:’); Readln(В);
Write (‘Сериясы:’); Readln(С);
Write (‘Фамилиясы, аты:’); Readln(D);
Write (‘Адрес:’); Readln(Е); End; End;
Procedure Out(I:Integer);
Begin Writeln (‘Бұл нөиерімен мынадай машиналар бар:’);
With X [K] Do Begin
Writeln (‘Қаласы:’,A);
Writeln (‘машина нөмірі:’,В);
Writeln (‘Сериясы:’,С);
Writeln (‘Фамилиясы, аты:’,D);
Writeln (‘Адрес:’,Е); End; End;
BEGIN
For k:=1 To 3 Do Inp;
Write (‘Көрнекті машина нөмірін енгіз:’); Readln(B);
For K:=1 To 3 Do If X [k].B=B Then Out(k);
Readln END.
Пайдаланған әдебиеттер
Блашкин И.И., Буров А.А. Новые возможности Turbo Pascal 6.0. СПб.: Изд-во
Васильев П.П. Турбо Паскаль − мой друг: М.: Компьютер, ЮНИТИ, 1995.-96 б.
Зуев Е.А. Язык программирования Turbo Pascal 6.0-М.: Унитех, 1992.-298 б.
Мизрохи. Turbo Pascal и объектно-ориентированное программирование.-М.: Финансы и статистика, 1992.-185 б.
Справочник по процедурам и функциям Borland Pascal with Objects 7.0 – Киев: «Диалектика», 1993.-272 б.
Фаронов В.В. Программирование на персональных ЭВМ в среде Турбо паскаль.-М.: Изд-во МГТУ, 1990.-580 б.
Фаронов В.В. Турбо Паскаль (в 3-х книгах). Кн.1. Основы Турбо Паскаля.-М.: Учебно-инженерный центр «МВТУ-ФЕСТО ДИДАКТИК», 1992.-304 б.
Фаронов В.В. Турбо Паскаль (в 3-х книгах). Кн.3. Практика программирования. Часть 1.-М.: Учебно-инженерный центр «МВТУ-ФЕСТО ДИДАКТИК», 1993.-256 б.
Фаронов В.В. Турбо Паскаль (в 3-х книгах). Кн.3. Практика программирования. Часть 2.-М.: Учебно-инженерный центр «МВТУ-ФЕСТО ДИДАКТИК», 1993.-304 б.
Федоров А. Особенности программирования на Borland Pascal.-Киев: Диалектика, 1994.-144 б.