Axborot xavfsizligi fakulteti

type point =record x, y: real end;

segment = record a, b : point end;

triangle =record a, b, c: point end;

circum = record centre : point; rad:real end

{boshqa shakllarni yozilishi}

const pi = 3.1415926; twopi = 2  pi;

implementation

end
bu yerda modul vazifasi, kerakli tabiatni berilganlari namoyishi bilan bog’langan turlarni yozilishi ekanligi va balki o’zgarmaslarni umumiy ishlari uchun kerakli bo’lganligidan realizatsiya bo’limi yo’q. Aniq dasturda (yoki modulda) yuqorida ko’rsatilgan tur o’zgaruvchilarini kiritish mumkin, dastur boshida ko’rsatish yoki modul interfeysida uses Geomfig kondtruksiyasida.

2. Modul o’zgartirish sohasiga bog’liq va dasturosti paketini aniqlash uchun qo’llanilishi mumkin va umumiy realizatsion metodlar bilan ham mumkin. Demak, masalan, hisoblanuvchi vazifalar qatori uchun, Sustem moduli namoyish qiluvchi matematik funksiyalar yetali bo’lmasligi ham mumkin, va biz Mathfundeb nomlangan moduli yordamida bizni qiziqtirgan qo’shimcha funksiyar to’plamini yaratishimiz mumkin.

unit Mathfun;

interface