«Қазақстан тарихы, жалпы білім беру пәндері және ақпараттық жүйелер» кафедрасы



бет31/64
Дата17.06.2022
өлшемі0.51 Mb.
#459285
түріЛекция
1   ...   27   28   29   30   31   32   33   34   ...   64

6. Жүзеге асу бөлімі


Жүзеге асу бӛлімі IMPLEMENTATION қызметші сӛзімен басталады және интерфейс бӛлімінде жарияланған кӛмекші программалардың тексті жазылады. Мұнда модульүшін локал болатын объекттер – қосымша типтер, константалар, айнымалылар және блоктар, егер жүзеге асу бӛлімінде қолданылатын болса онда белгілер де жариялануы мүмкін
Модульдің интерфейс бӛлімінде жарияланған кӛмекші программаның атауы орындалу бӛлімінде келтірілуі тиіс. Мұнда формальді айнымалылардың тізімін және функция типін кӛрсетпей тастап кетуге болады. Ӛйткені олар интерфейс бӛлімінде сипатталған. Егер атау толық түрде жазылса, онда ол интерфейс бӛлімінде жарияланған атаумен түгел бірдей болуы керек. Unit Cmplx; Interface type complex = record re, im : real end;
Procedure AddC (x, у : complex; var z : complex);
Implementation Procedure AddC; begin
z.re := x.re +Y.re;
z.im := x.im +y.im
end; end.
Локал айнымалылар және константалар, сонымен бірге модульді компиляциялау нәтижесінде туындаған барлық программалық код жадының жалпы сегментіне орналастырылады (в общий сегмент памяти) .

7. Инициалдау бөлігі


Инициалдау бӛлігі модульді аяқтайды. Инициалдау бӛлігі BEGIN қызметші сӛзінен басталады. Инициалдау бӛлігі бос болуы да мүмкін, бұл жағдайда BEGIN –нен кейін бірден END. сӛзі жазылады, немесе бүткілдей жоқ болуы мүмкін.
Инициалданатын бӛлімде программа фрагменті боп табылатын орындалатын операторлар жазылады. Бұл операторлар басқаруды негізгі программаға бергенше орындалады және әдетте оның жұмысына дайындық үшін қолданылады. Мысалы, мұнда айнымалылар инициалдануы, қажет файлдар ашылуы, ӛзара байланыстары (коммуникациалық каналдар т.б.
бойынша) орнатылуы мүмкін.
Unit FileText;
Interface
Procedure Print(s : string);
Implementation var f: text; const
name = 'output.txt'; Procedure Print; begin WriteLn(f, s) end;
{ Начало инициирующей части: } begin assign(f, name); rewrite(f);
{ Конец инициирующей части } end.
Инициалдау бӛлімін бос етуге кеңес берілмейді, одан да жазбаған дұрыс (begin end.-ті). Бос бӛлімде бос оператор бар болады, програмамны іске қосқан кезде басқару осы операторға беріледі. Бұл оверлейлік программаларды құру кезінде қиындықтар туғызады.


Достарыңызбен бөлісу:
1   ...   27   28   29   30   31   32   33   34   ...   64




©dereksiz.org 2024
әкімшілігінің қараңыз

    Басты бет