Uses ;
Misol:
Program SS;
Uses Crt,Graph;
Turbo-Paskal sistemasida har bir foydalanuvchi o’z modulini yaratishi uchun yaratiladigan modul strukturasini quyidagicha tashkil kilish zarur.
Uses ;
Interface
. . . . .
{Interfeys qism- ochiq (yozuvlar) qismi}
. . . . .
Implementation
. . . . .
{YOpiq (yozuvlar) qismi}
. . . . .
Begin
. . . . .
{Modulning asosiy qismi}
. . . . .
End.
Bu yerda
Unit - modulning sarlavhasi;
Interface - modulning interfeysi, ya’ni dastur va boshqa modullar uchun ochiq (ko’rinarli) qismining boshlanishini bildiradi. Bu qismda o’zgarmaslar, kattaliklar tiplari, protsedura va funksiyalar aniklanib kursatilgan bo’ladi, lekin ularning butun ko’rinishi keyingi yopiq qismda beriladi.
Implementation - modulning dastur va modullar uchun yopiq, ya’ni ko’rinmaydigan qismining boshlani-shini bildiradi. Bu yerda interfeys qismda aniqlangan protsedura va funksiyalar yana bir marta ko’rsatilishi shart (ularning sarlavhalari bir xil bo’lishi kerak).
Initsializatsiya qismi Begin yozuvidan keyin boshlanadi, agar bu qism mavjud bo’lmasa Begin ham bo’lmaydi. Bu qismda boshqaruvni asosiy programaga o’tkizishgacha qadar bajarilishi kerak bulgan operatorlar ruyxati joylashadi.
Misol tariqasida ikki sonning eng katta va eng kichigini topish modulini yaratish dastursini qaraymiz. Quyidagi dastur Min(x,y) va Max(x,y) funksyalarini o’z ichiga olgan.
Unit Study;
Interface {Interfeys kism}
Function Min(x,y:Integer):Integer;
Function Max(x,y:Integer):Integer;
Implementation {YOpik kism}
Function Min(x,y:Integer):Integer;
Begin
If x<=y Then Min:=x Else Min:=y;
Chia sẻ với bạn bè của bạn: |