А. А. Медатов, М. К. Абдувохидов, О. А. Маматқулов


Мустахкамлаш учун саволлар


Download 0.79 Mb.
bet29/57
Sana20.12.2022
Hajmi0.79 Mb.
#1035125
1   ...   25   26   27   28   29   30   31   32   ...   57
Bog'liq
Turbo Pascal услубий кулланма янги

Мустахкамлаш учун саволлар.
1. Қандай боғланиш рекуррент боғланиш дейилади?
2. Фибоначчи кетмакетлигида сонлар бир бири билан қандай боғланган?


Таянч тушунчалар: рекуррент боғланиш, фибоначчи кетмакетлиги.


Адабиётлар: [1],[2],[3],[5],[6],[7],[8],[9],[10]


Case  танлаш оператори
Режа:
1. Case операторининг бичими.
2. Case операторига мисол.

Танлаш оператори ҳам тармоқ оператори каби бир марта бажарилади.


Бичими:
Case n of
A1: <оператор 1 >;
A2: <оператор 2 >;
A3: <оператор 3 >;
………
Ak: <оператор k >;
else <оператор k >;
end;
Бунда case  танлаш оператор номи, n нинг қиймати ҳисобланадиган ифода ёки ўзгарувчи, of (дан)  ёрдамчи сўз, A1, A2, … Ak  n нинг қиймати билан солиштириладиган константалар; оператор 1, оператор 2, …, оператор k  операторлар.
Бу операторлар қайси бирининг константаси n билан тенг бўлса ўша оператор бажарилади.
Агар n нинг қиймати a1, a2, …, ak ларнинг бирортасига тенг бўлмаса, else ёрдамчи сўзидан кейин келувчи оператор бажарилади.
Танлаш оператордаги else тармоғи ёзилмаслиги ҳам мумкин. Else ёзилмаган ҳолда n нинг қиймати a1, a2,…ak ларнинг бирортасига ҳам тенг бўлмаса, бу оператор бажарилмайди.
Агар константаларнинг бир неча қийматлари учун умумий бўлган битта операторнинг бажарилиши талаб қилинса, бундай константаларни бир қаторга вергул билан ажратиб ёзилиб, икки нуқтадан сўнг улар учун умумий бўлган оператор ёзилади.
Масалан,
case n of
0,2,4,6,8: writeln(‘жуфт’)
1,3,5,7,9: writeln(‘ток сон’)
10..100: writeln(’10 дан 100 гача бўлган сонлар’);
end;
Масалан ой номерига кўра ой ва фаслни аниқловчи дастур фрагментини қуйидагича ёзиш мумкин:
Case n of
1: write (‘Январь’);
2: write (‘Февраль’);
3: write (‘Март’);
4: write (‘Апрель’);
5: write (‘Май’);
6: write (‘Июнь’);
7: write (‘Июль’);
8: write (‘Август’);
9: write (‘Сентябрь’);
10: write (‘Октябрь’);
11: write (‘Ноябрь’);
12: write (‘Декабрь’); else writeln(‘Бундай ой йўқ’);
end;
case n of
1,2,12: writeln(‘, Қиш фасли’);
3..5:writeln(‘, Баҳор фасли’);
6..8:writeln(‘, Ёз фасли’);
9..11: writeln (‘, Куз фасли’);
end;



Download 0.79 Mb.

Do'stlaringiz bilan baham:
1   ...   25   26   27   28   29   30   31   32   ...   57




Ma'lumotlar bazasi mualliflik huquqi bilan himoyalangan ©fayllar.org 2024
ma'muriyatiga murojaat qiling