1-маъруза: Математик моделлаштиришнинг асосий тушунчалари, масалаларни эщмда ечиш бос=ичлари ва алгоритмлар назарияси

2. Кырсаткичлар ха=ида бошлан\ич маълумотлар
Кырсаткич шундай ызгарувчики, у маълумотнинг =ийматини эмас, балки уларнинг хотирадаги жойлашган адресини ызида са=лайди. Кырсаткичларнинг икки хил типи мавжуд: типланган ва типланмаган. Типланмаган кырсаткичларнинг эълон =илиш учун pointer хизматчи сызидан фойдаланилади, типланган кырсаткичларни эълон =илиш учун эса кырсатилган тип олдидан "^" белгиси =ыйилади.
Мисол:


var
p: pointer; {типланмаган кырсаткич}
pint: ^ integer ; {pint - типланган, бутун типли кырсаткич}
x, y: ^ byte; {x, y - байт типидаги кырсаткич}
pst: ^ string ; {pst - =атор типидаги кырсаткич}

Адреси кырсаткичда жойлашган зарур маълумотга кырсаткич =илиш учун кырсаткич исмидан кейин "^" белгисини ёзиш керак:

GetImage (0, 0, 100, 100, p^); {график экран сощасининг
маълумотлари р да кырсатилган
адресдаги хотира сощасига ёзилади}
pint^ :=2; {pint адреси быйича 2 бутун сони ёзилади}
x^ := # 12; y^ := $2; {x^ байтига # 12 =ийматини ызлаштири-лади, y^ байтига эса $ 2}
pst^ := ' Ахмад'; {pst =аторига 'Ащмад' сызини ызлаштирилади}

Кырсаткични ишлатиш учун уни фа=ат эълон =илибгина =олмай, унинг =андай жойни кырсатаётганлигига щам катта ащамият бериш зарур. Яъни, кырсаткич оператив хотиранинг керакли маълумотлар жойлашган адресини ани= кырсатиши керак. Кырсаткич адресини хато кырсатиш кутилмаган натижалар олишга ёки бутунлай программа ишини чиппакка чи=аришга олиб келиши мумкин. Шунинг учун, Паскал тилида махсус процедуралар мавжудки, улар ёрдамида хотира адреси ани= щисобланади.

1. GetMem процедураси (типланмаган курсаткичлар учун) - тезкор хотирадан зарур ми=дорда жой ажратади ва унинг адресини кырсаткичга жойлаштиради.
Ани=ланиш: GetMem (var p: Pointer; size : word);
p - кырсаткич, size - ажратилган хотиранинг байт ылчовидаги ми=дори.
Мисол:


var
p: pointer;
begin
GetMem (p, 1000); {1000 байт узунликдаги хотира
сощаси ажратилди}
{p^ сощадан фойдаланиш блоки}
FreeMem (p, 1000); {р адресдаги 1000 байт узунликли
хотира сощаси бышатиб =ыйилди}
end.

2. New процедураси (типланган кырсаткичлар учун) - хотирадан зарур жойни банд =илиб, унинг адресини берилган кырсаткичга жынатади.

Ани=ланиши: New (var p: pointer);
р - берилган кырсаткич.
New ва GetMem процедуралари нисбатан жуда катта щисобланмиш хотиранинг динамик сощасидан зарур ми=дордаги хотира сыраб олади. Шу хотирани банд =илиб, унинг адресини мос кырсаткичга жынатади. Шундай щоллар щам быладики, хотиранинг динамик сощасида быш жой =олмайди, у щолда шу хотирага ю=оридаги процедуралар билан =илинган кырсаткич =уйидаги маълумотли хатони юзага келтиради: