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

Yuklangan vaqt:

20.09.2019

Ko'chirishlar soni:

0

Hajmi:

55.5 KB

Ko'chirib olish

www.arxiv.uz Т а ш к и л и й , у т и ш в а ш а р т л и о п е р а т о р л а р Режа: 1. Ташкилий оператор ва унинг фазифаси 2. У тиш оператори 3. Чала ва тулик шартли операторлар

www.arxiv.uz Т а ш к и л и й о п е р а т о р в а у н и н г ф а з и ф а с и Бир нечта операторларнинг кетма-кетлигини битта операторга бирлаштириш учун ташкилий оператор зарур булади. Ташкилий оператор -бу begin ва end хизматчи сузлари орасига олиб ёзилган, ихтиёрий операторларнинг кетма-кетлигидир : <ташкилий оператор>::к begin <оператор>{;<оператор>} end Хусусий холда, операторлар кетма-кетлиги битта оператордан хам ташкил топиши мумкин. Ташкилий операторга доир мисоллар : 1. Begin k :к 5 end 2. Begin y:к x/7*exp(xк5); z:к ln(abs(y)) end 3. Begin k:к0; begin i:к0; z:кi*(iкk); end; k:к2*k; end 4. if x>0 then begin a:к5; c:кa*Sin(a) end Юкоридаги 3-мисолда курсатилгандай, ташкилий оператор рекурсив характерга хам эга. 2 . У т и ш о п е р а т о р и

$www.arxiv.uz Одатда, программа уз ишини ёзилган операторлар кетма-кетлиги буйича амалга оширади. Операторларнинг табиий бажарилиш кетма- кетлигини бузиш учун, шартсиз утиш операторидан фойдаланиш мумкин. Программанинг бирор операторидан бошкаришни бошка операторга узатиш учун, бошкарилиш узатиладиган оператор олдига там\а (метка) куйилиши керак . Бошкаришни шартсиз узатиш оператори куйидаги формада ёзилади : <утиш оператори> ::к goto <метка> бу ерда goto - … га утмок. Бу оператор ёрдамида бошкариш курсатилган меткали операторга узатилади. Юкорида айтганимиздек, программада катнашган барча меткалар, программанинг меткалар булимида эълон килиниши керак. Утиш операторига доир мисоллар: 1) a :к 5.75; b:к sqr(a); goto L5; c :к 9.76; L 5: d :к a к b ; 2) L : a :к5; goto L ; 3) 1: x:к0; d:кx*x; goto 1; y:кx; 1- программада С:к9.76 операторидан бошка барча операторлар бажарилади; 2- программа a :к5 кийматни тинимсиз хисоблайди; 3- программа хам x :к0 ва d :к x * x ифодани кайта-кайта хисоблаб, y :к x ифодани хисоблашга навбат келмайди. Умуман олганда, программа тузувчи иложи борича утиш операторида фойдаланмасликка харакат килгани маъкулдир. Чунки утиш операторидан$

www.arxiv.uz фойдаланиш, программанинг укилишини кийинлаштириб,унинг сифатини кескин пасайтиради. Утиш операторидан фойдаланишга доир куйидаги тулик программани куриб чикайлик: Program m1; Label 1; Var a,y:real; Begin 1: Readln (a); If a< 0 then goto 1; { а нинг к иймати а  0 шартини к аноатлантирмагунча к айта - дан киритилмо к да } y:  ln(a) Writeln(‘yк ’,y); end. 3 . Ш а р т л и о п е р а т о р Алгоритмлар назариясидан маълумки хисоблаш жараёнларини шартли равишда уч хил гурухга ажратиш мумкин : 1. Чизикли жараёнлар; 2. Тармокланувчи жараёнлар; 3. Такрорланувчи жараёнлар. Чизикли жараённи хисоблаш алгоритми катъий кетма-кетлик асосида амалга оширилади. Бундай жараённи хисоблаш учун узлаштириш операторининг узи етарли булади. Тармокланувчи жараённи хисоблаш йули маълум бир шартни бажарилиши ёки бажарилмаслигига караб танланади. Тармокланувчи

www.arxiv.uz жараёнларни хисоблаш учун шартли оператордан фойдаланилади. Шартли оператори икки хил куринишда булади:  тулик шартли оператор;  чала шартли оператор. Тулик шартли оператор куйидаги формада ёзилади: <тулик шартли оператор> ::к if <мантикий ифода> then <оператор> else <оператор> бу ерда if (агар), then (у холда), else (акс холда) - хизматчи сузлар. Шундай килиб, тулик шартли операторни соддарок куйидагича ёзиш мумкин: if S then S1 else S2; бу ерда S – мантикий ифода; S 1 – S мантикий ифода рост киймат кабул килганда ишловчи оператор; S 2 – S мантикий ифода ёлгон киймат кабул килганда ишловчи оператор. Шартли операторнинг бажарилиши унда ёзилган S 1 ёки S 2 операторларидан факат бирини бажарилишига олиб келади, яъни агар S мантикий ифода бажарилишидан сунг true (рост) киймати хосил булса S 1 оператори, акс холда эса S 2 оператори бажарилади. Тулик шартли операторга доир мисоллар: 1. if aк2 then d:к xк2 else d:к x-2; 2. if (x<y) and z then begin y:к x * sin(x);

www.arxiv.uz t:кx * cos(x) end else begin y:к 0; t:к1 end; 3. if (x<0) or (xк3) then y:к x*xк1 else if x<2 then y:к sqr(abs(x-1)) else y:к x*x; Чала (туликмас) шартли операторнинг ёзилишини куйидагича ифодаласа булади: if S then S1; бу ерда S - мантикий ифода , S1 - оператор . Агар S ифода киймати true ( рост ) булса S1 оператори бажарилади , акс холда эса , бошкариш шартли оператордан кейин ёзилган операторга узатилади . Юкорида аникланган шартли операторлардан бир хил максадда бемалол фойдаланиш мумкин. Бу иккала оператордан фойдаланиб, программа тузиш учун куйидаги мисолни куриб чикайлик: y ax b cx d      а га р x >0 а га р x 0 бу ерда фараз килайликки а к 1,5 ; b к 4 ; c к 3,7; d к - 4,2. x - эса киймати бериладиган номаълум узгарувчи. " y " тармок функциясини хисоблаш программасини тузиш талаб этилсин. 1. Тулик шартли оператордан фойдаланиб тузилган программа: program misol1; var x, y, a, b, c, d: real; begin readln (x); { х ниг кийматини клавиатурадан киритиш суралмокда} a:к1.5; b:к4; c:к3.7; d:к-4.2; if x>0 then y:к a*xкb else y:кc*xкd; writeln ( y );

www.arxiv.uz end . 2. Чала шартли оператордан фойдаланиб тузилган программа: program misol2; label L1; var x, y, a, b, c, d: real; begin readln (x); a:к1.5; b:к4; c:к3.7; d:к-4.2; if x>0 then begin y:кa*xкb; goto L1 end; y:к c*xкd; L1: writeln (y); end. Шартли операторнинг синтаксис к оидасига кура then ва else хизматчи сузларидан сунг фа к ат битта оператор ёзилиши мумкин , агар бир нечта операторларни ёзиш лозим булса у холда , бу операторлар кетма - кетлиги begin ва end хизматчи сузлари орасига олиниб ташкилий оператор хосил к илинади . Мисол : if a>b then begin y: a*cos(a); z:  Sqr(y); p:  Sqrt(abs(y  z)); writeln(z) end else begin y:  a*sin(a); z:  Sqr(y)*y;

www.arxiv.uz p: tan(y  z); writeln(z) end; Купгина операторлар каби, шартли оператор хам рекурсивлик хоссасига эга яъни, шартли оператор ичида яна шартли оператор катнашиши мумкин. Лекин, чала шартли операторнинг ичида яна шартли оператор ёзишда эхтиёт булмок зарур, чунки ёзилган операторни икки хил маънода тушуниш мумкин: if B1 then if B2 then S1 else S2 бу оператор куйидагича тушунилиши мумкин: 1) if B1 then begin if B2 then S1 else S2 end 2) if B1 then begin if B2 then S1 end else S2

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

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

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

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

Тармокланувчи таркибли дастурлар

Бошкарув объектининг ташкилий структураси ва АБС