Процедура – операторлар - Informatika va AT - Referatlar

Процедура – операторлар

Yuklangan vaqt:

20.09.2019

Ko'chirishlar soni:

0

Hajmi:

77 KB

Ko'chirib olish

www.arxiv.uz П р о ц е д у р а – о п е р а т о р л а р Режа: 1. Процедура ва функция хакида умумий маълумотлар; 2. Параметрсиз процедуралар; 3. Параметрли процедуралар

www.arxiv.uz П р о ц е д у р а в а ф у н к ц и я х а к и д а у м у м и й м а ъ л у м о т л а р Программа тузиш жараёнида, унинг турли жойларида маъносига кура бир хил, мустакил характерга эга булган ва ечилаётган асосий масаланинг бирор кисмини хал килишни уз буйнига олган мураккаб алгоритмдан бир неча маротаба фойдаланишга тугри келади. Масалан, матрицаларни купайтириш, матрицани векторга купайтириш, чизиксиз тенгламани ечиш, чизикли алгебраик тенгламалар системасини ечиш, факториал хисоблаш, йигинди хисоблаш ва хоказо каби масалаларни хал килиш алгоритлари жуда хам куп масалаларни ечишнинг бош алгоритмларида кайта-кайта, турли бошлангич маълумотлар билан катнашиши мумкин. Бундай холларда, малакали дастурчи программа матнини ихчамлаштириш, программанинг ишончлилик даражасини ошириш, программани тахрирлаш (отладка) ни тезлаштириш ва программанинг умумийлигини (универсаллигини) таъминлаш учун процедура ва функциялардан кенгрок фойдаланиб, мукаммал программа яратишга харакат килади. Процедура ва функциялар мустакил программали объектлар хисобланади. Бу мустакил программали объектни дастурчи уз хохишига ва ундан олинадиган натижаларига кура процедура ёки функция куринишида аниклаши мумкин. Одатда олинадиган натижа ягона кийматли булса функциядан, олинадиган натижалар сони бир нечта булса процедурадан фойдаланиш максадга мувофикдир. Процедурани ёзиш структураси худди асосий программа структураси каби булиб, факат сарлавхалари билангина фарк килади холос: procedure <процедура исми>(<формал параметрлар руйхати>); label <меткалар руйхати>; const <узгармасларни киритиш>; type <янги типларни аниклаш>; var <узгарувчиларнинг типларини эълон килиш>;

www.arxiv.uz <кисм программагагина тегишли булган ички процедура ва функциялар эълони>; begin <процедуранинг тана кисми> end ; Процедуралар ва функцияларни аниклаш асосий программанинг var (узгарувчиларнинг типларини эълон килиш) булимида бажарилади. Процедурадан программада фойдаланиш учун унинг исми ва фактик параметрлар руйхати ёзилади. Шунда процедура узига белгиланган ишни бажариб, узининг фактик параметрлари оркали асосий программага уз натижасини беради. Процедуранинг эълони ва унга мурожаат килишни кейинчалик куриладиган мисоллар оркали узлаштириб оламиз. 2 . П а р а м е т р с и з п р о ц е д у р а л а р Юкорида айтиб утганимиздек, процедура хисоблаб берган натижалар унинг фактик параметрлари оркали асосий программага узатилади. Лекин, айрим пайтларда процедура параметрсиз хам булиши мумкин. Бу холда асосий программанинг барча параметрлари процедура параметрлари ролини бажаради. Параметрсиз процедурада хам процедуранинг барча булимлари сакланиб колади, факат параметрлар руйхатигина катнашмайди. Процедураларни аниклаш ва улардан фойдаланишни куйидаги мисол устида куриб чикайлик: Мисол: u к max ( x к y , x * y ), v к max ( 0.5, u ) – берилган x ва y хакикий сонлардан фойдаланиб u ва v кийматларни аниклаш. бу ерда х, у - кийматлари киритиладиган хакикий типли узгарувчилар. 1. Масалани ечиш программасининг процедурадан фойдаланмай тузилган холи:

www.arxiv.uz Program max; var x, y, u, v: real; a, b, s: real; begin { х , у - микдорларни киритиш }; readln (x,y); a:к x кy; b:к x*y; if a > b then S:к a else S:кb; u :к S; a:к 0.5; b:кu; if a > b then S:к a else S:кb; v: к S; { олинган натижалар }; writeln (u, v) end . Ахамият берсангиз, программадаги шартли оператор икки марта такрорланиб, бир хил иш бажарди. 2. Масалани ечиш программасини параметрсиз процедурадан фойдаланиб тузилган холи (энди юкоридаги программада йул куйилган камчиликни процедуралар оркали тузатишга харакат киламиз): Program max; var x, y, u, v: real; a, b, S: real; procedure max1; begin if a>b then S:кa else S:кb; end;

www.arxiv.uz begin readln (x, y); a:к x к y; b:кx * y; max1; { max1 процедурасига 1- марта мурожаат к илинмо к да } u:кS; a:к 0.5; b:к u; max1; { max1 процедурасига 2- марта мурожаат к илинмо к да } v:кS; writeln (u,v); end. Асосий программанинг операторлар к исмида икки марта ёзилган max1 параметрсиз процедурасига мурожаат , эълон к илинган процедурани икки марта асосий программага олиб келиб ишлатишни ташкил к илади . Ахамият берилса, иккинчи программа биринчи процедурасиз тузилган программага кура ихчамрок ва соддарокдир. Биз киритган процедура хозирча факат иккита хакикий сон ичидан каттасини аниклаб берди холос, шунинг учун программа матнинг хажмини камайтиришдан эришган ютук салмокли булмади. Лекин, процедуралар асосан куп хажмли матндаги амалларни, вазифаларни бажаришга мулжалланади ва бу холда эришилган ютук салмоги анча юкори булади. Параметрсиз процедуранинг асосий камчилиги, унинг асосий программага ва ундаги маълум параметрларга богланиб колганлигидир. 3 . П а р а м е т р л и п р о ц е д у р а л а р

www.arxiv.uz Процедура билан асосий программани боглайдиган асосий фактор бу – процедура параметрларидир. Параметрларни иккита типга ажратилади: кийматли параметрлар (параметр-киймат), узгарувчили параметрлар (пара- метр - узгарувчи). Параметр - киймат бу процедурани ишлаш жараёнини таъминловчи параметрлар хисобланади, яъни асосий программа кийматларини процедурага узатадиган параметрлардир. Энди, юкорида куриб чикилган сонларни энг каттасини топиш алгоритмининг программа c ини кийматли параметр билан ёзилган процедуралар оркали амалга оширайлик: Program max; var x, y, u, v: real; S: real; procedure max2 ( a, b: real ); begin if a>b then S:кa else S:кb; end; begin read (x, y); max2 (x к y, x * y); u:кS; max2 (0.5 , u); v:кS; writeln (u, v) end. бу ерда a, b - процедуранинг кийматли формал параметрлари . Процедурага мурожаат килишда формал ва фактик параметрларнинг типлари узаро мос келиши керак, акс холда программа хато тузилган хисобланади. Юкоридаги программадан куриниб турибдики, a ва b формал параметрлар урнига натижавий кийматлари маълум ифодалар куйилди. Демак, кийматли фактик параметрлар урнига, шу типли натижага эришувчи

www.arxiv.uz ифода ёзилиши мумкин. Бундан ташкари, процедурада киритилган a ва b параметрлари факат процедуранинг ичидагина маънога эга, ташкарида, мисол учун асосий программада улар тушунарсиз, кийматлари аникланмаган микдорлардир. Шунинг учун, кийматли параметрларга процедура натижаларини узлаштириб, асосий программага узатиб булмайди. Юкорида тузилган программанинг асосий камчилиги, топилган катта сон доим S узгарувчисига узлаштирилаяпти. Мисолимиз шартига кура, натижалар u ва v узгарувчиларига узлаштирилиши керак. Шунинг учун, программада икки марта кушимча u :к S ва v :к S узлаштириш операторлари ёзилди. Бу камчиликни тузатиш учун процедурага яна бир параметрни киритамиз. Лекин, киритилган бу параметр процедурага киймат олиб кирмайди балки, процедура натижасини асосий программага олиб чикиб кетади. Бундай параметрни параметр - узгарувчи деб аталади. Параметр-узгарувчини параметр-кийматдан фарк килиш учун процедурани аниклашдаги параметрлар руйхатида узгарувчи олдидан var хизматчи сузи ёзилади. Параметр - узгарувчидан сунг албатта, унинг типи курсатиб куйилади. Юкорида айтганимиздек, формал параметр - киймат урнига процедурага мурожаат вактида шу типли ифода ёзиш мумкин булса, параметр - узгарувчи учун бу хол мутлако мумкин эмас. Процедурани мукаммаллаштириб бориш динамикасини хис этиш учун яна, юкорида курилган максимум топиш мисолининг программасини параметр - узгарувчи ишлатган холда куриб чикамиз: Program max; var x, y, u, v: real; procedure max3(a, b: real; var S: real); begin if a>b then S:кa else S:кb;

www.arxiv.uz end; begin readln (x, y); max3( x к y, x * y, u); {x  y ва x*y ифодаларининг каттаси u узгарувчисига узлаштирилмо к да } max3( 0.5, u, v); {0.5 ва u ифодаларининг каттаси V узгарувчисига узлаштирилмо к да } writeln( u, v) end. Шундай килиб, битта программани процедуранинг уч хил варианти учун тузиб чикиб, натижада ихчам ва содда программага эга булдик. Процедураларни аниклашда шу пайтгача оддий типли параметрлардан фойдаланиб келдик. Лекин, биз шуни яхши биламизки, Паскал тилида хосилавий типлар хам мавжуд. Параметр - узгарувчига хосилавий, янги типлар бериш худди оддий скаляр тип бериш каби амалга оширилаверади. Аммо, параметр - кийматларда янги типлар масаласига батафсилрок ёндашиш керак. Биз юкорида эслатиб утдикки, фактик параметр формал параметр - кийматга мос типли ихтиёрий ифода булиши мумкин. Лекин, Паскал тилида ихтиёрий типли кийматлар учун шу типдаги натижа берувчи хеч кандай амал кузда тутилмаган. Шунинг учун, бу типлар учун фактик параметрлар факат шу типга мос узгарувчилар булиши мумкин холос. Бундай хол, хусусий холда массивлар учун хам уринлидир. Фараз килайлик, программада узгарувчилар куйидагича эълон килинган булсин: const nк20; type vector к array [1..N] of real; var u, v: real; x, y: vector;

www.arxiv.uz Бу ерда uк max{x i }, vк max {y i } ларни ани к лаш талаб к илинаётган булсин . Векторнинг энг катта хадини топишни албатта процедура куринишида ташкил киламиз: procedure max1 (A:vector; var S: real); var i: integer; begin S:кA[1]; for i:к2 to n do if A[i] > S then S:к A[i] end . Бу процедурага асосий программада мурожаат max1 (x, u); max1 (y, v); куринишида амалга оширилади . Процедурадаги А векторини параметр - киймат сифатида ёзиб куйганимиз учун , процедурага килинаётган хар бир мурожаатда А векторга мос равишда Х ва Y векторлари кучириб ёзилади ва сунг процедура уз ишини бажаради . Биз биламизки , бир тарафдан , массивларнинг устида кучириш амалини бажаришга анча вакт кетади , иккинчи тарафдан , хар сафар янгидан процедурага килинган мурожаатда А вектор учун хотирадан кушимча жой ажратилади . Шунинг учун , процедуранинг сарлавхасида куйидагича алмаштириш килсак , юкоридаги икки камчиликни бартараф килган буламиз : procedure max1 (var A: vector; var S: real); Энди процедурани эълон к илиш , ундан фойдаланиб программа яратиш малакасини хосил к илганимиздан сунг , уни эълон к илишнинг синтаксис к оидаларини куриб чи к айлик . Процедурани аниклаш (эълон килиш) куйидагича амалга оширилади:

www.arxiv.uz <процедурани аниклаш>::  <процедура сарлавхаси>;<блок> Бу ерда <блок> тушунчаси туликлигича <программа танаси> тушунчаси билан бир хил синтаксис коида асосида аниклангани учун, бу тушунчага ортик кайтиб утирмаймиз. Энди эса <процедура сарлавхаси> га таъриф берамиз: <процедура сарлавхаси>::к Procedure <процедура исми>  Procedure <процедура исми>(<формал параметрлар руйхати>) Процедура исми дастурчи томонидан танланадиган оддий идентификатор хисобланади. Формал параметрлар руйхати куйидагича аникланади: < формал параметрлар руйхати >::к<формал параметрлар секцияси > {; < формал параметрлар секцияси >} Формал параметрлар секцияси деганда процедура параметрларининг параметр-киймат ва параметр-узгарувчи лардан иборат булишлиги тушунилади: < формал параметрлар секцияси >::к{< исм > {, < исм >}: <исм типи>  var <исм>{,<исм>}:<исм типи> бу ерда <исм> - формал параметрлар сифатида ишлатиладиган идентификатор. Энди юкоридаги аниклашларга тушунтиришлар бериб утсак. Юкоридаги Бекус-Наур формулаларидан куриниб турибдики, формал параметрлар руйхати (агар у мавжуд булса) битта ёки бир нечта узаро нукта- вергул (;) белгиси билан ажратилган секциялардан ташкил топган. Щар бир секцияда эса уз навбатида, битта ёки бир нечта узаро нукта-вергул билан

www.arxiv.uz ажратилган формал параметрлар катнашиши мумкин. Процедурадаги формал параметрлар сонини, дастурчининг узи процедурани аниклаш мохиятидан келиб чиккан холда танлайди. Мисол: Procedure P(A:Char; B:Char; Var C:Real; Var D:Real; E:Char); бу ерда формал параметрлар руйхати бешта секциядан иборат : A,B,E – лар Char типли к ийматлар , C, D – лар Real типидаги узгарувчилар . Шу билан бир каторда хар бир секция факат, битта параметрни уз ичига олмокда. Бир хил типли, хамда кетма-кет жойлашган кийматларни ва узгарувчиларни битта секцияга бирлаштириб процедура сарлавхасини куйидагича ёзиш хам мумкин: Procedure P(A,B:Char; Var C,D:Real; E:Char); Шундай к илиб , секция деганда бир хил типли параметр - к ийматлар ёки параметр - узгарувчиларнинг руйхатини тушуниш мумкин . Купчилик бошловчи дастурчилар йул к уядиган к уйидаги хатоликлардан эхтиёт булмо к зарур : Procedure P(Var Х:Real; Y:Real); бу сарлавха Procedure P(Var Х,Y:Real); сарлавхаси билан бир хил эмас.

www.arxiv.uz Аникланган процедурага мурожаат ёки процедура операторидан кандай фойдаланишни аниклашни куриб чикайлик (яратилган процедурани «Активлаштириш», яъни ишлатиш): <процедура оператори>::к<процедура исми>  <процедура исми>(<фактик параметрлар руйхати>) Агар процедура аникланишида параметрсиз булса, унга мурожаат килиш хам факат, процедура исмини ёзиш билангина амалга оширилади. Агар процедура аникланишида параметрли булса, албатта процедура- оператор хам унга мос фактик параметрлар руйхатига эга булади. Шу параметрлар оркали процедурага мурожаат килинаётганида, формал параметрлар фаоллаштирилади:

www.arxiv.uz Ф о й д а л а н и л г а н а д а б и ё т л а р р у й х а т и 1. Вирт Н. Алгоритму структуру даннух программу. - М.: Мир, 1985 г. 2. Абрамов В., Трифонов Н., Трифонова Г. Введение в язук Паскал. - М.: Наука, 1988 г. 3. Файсман А. Профессиональное программирование на Турбо Паскале. - Т.: "Инфомэкс Корпорейшн", 1992 г. 4. Findlay W., Watt D.A., Paskal. An introduction to methodical programmin. Third edition. – London: Pitman, 1985 г . 5. Поляков Д. Б., Круглов И. Ю. Программирование в среде Турбо-Паскаль (версия 5.5): Справ.-метод. пособие. – М.: Изд-во МАИ. 1992 г. 6. Епанешников А., Епанешников В. Программирование в среде Turbo Pascal 7.0 М., Диалог-наука, 1993 г. 7. www.uzedu.uz

O'xshashlar

Процедура ва функциялар

Бириктирилган операторлар ва функциялар

Такрорловчи ва буш операторлар

Ташкилий, утиш ва шартли операторлар

Турбо-Паскалда содда программалар тузиш. Операторлар