Массивлар (жадвал катталиклар)

Yuklangan vaqt:

20.09.2019

Ko'chirishlar soni:

0

Hajmi:

58.5 KB

Ko'chirib olish

www.arxiv.uz М а с с и в л а р ( ж а д в а л к а т т а л и к л а р ) Режа: 1. Массивлар хакида умумий маълумотлар; 2. Бир ўлчамли массивлар ва улар устида амаллар; 3. Кўп ўлчамли массивлар ва улар устида амаллар.

www.arxiv.uz М а с с и в л а р х а к и д а у м у м и й м а ъ л у м о т л а р Биз шу пайтгача кийматларнинг оддий (скаляр) типларидан фойдаланиб, турли хил программалар яратишни ўргандик. Скаляр типга тегишли хар бир киймат ягона маълумот хисобланиб, тривиал структурага эгадир. Амалда эса, турли хил хосилавий типлар билан ишлашга, улардан фойдаланиб мураккаб программалар яратишга тўғри келади. Бу типларга тегишли кийматларнинг хар бири тривиал бўлмаган структурага эга, яъни бу кийматлар ўз навбатида яна бир нечта кийматлардан ташкил топади. Энди шундай типлардан бири бўлган, программалашда энг кўп кўлланиладиган программа объекти – массивлар билан танишиб чикамиз. Б и р ў л ч а м л и м а с с и в л а р в а у л а р у с т и д а а м а л л а р Массив - бу бир хил типли, чекли кийматларнинг тартибланган тўпламидир. Массивларга мисол сифатида математика курсидан маълум бўлган векторлар, матрицалар ва тензорларни кўрсатиш мумкин. Программада ишлатилувчи барча массивларга ўзига хос исм бериш керак. Массивнинг хар бир хадига мурожаат эса, унинг номи ва ўрта кавс ичига олиб ёзилган тартиб хади оркали амалга оширилади: <массив номи> [<индекс>] бу ерда <индекс> - массив хадининг жойлашган ўрнини англатувчи тартиб киймати. Умуман олганда, <индекс> ўрнида <ифода> катнашиши хам мумкин. Индексни ифодаловчи ифоданинг типини – индекс типи деб аталади. Индекс типининг кийматлар тўплами албатта номерланган тўплам бўлиши, шу билан бир каторда, массив хадлари сонини аниклаши ва уларнинг тартибини белгилаши керак.

www.arxiv.uz Массивларни эълон килишда индекс типи билан бир каторда массив хадларининг типи хам кўрсатилиши керак. Бир ўлчамли массивни эълон килиш куйидагича амалга оширилади: array [<индекс типи>] of <массив хадининг типи>; Кўпинча <индекс типи> сифатида чекланма типлардан фойдаланилади, чунки бу типга тегишли тўплам тартибланган ва катъий номерлангандир. Мисол учун, 100 та хакикий сонли хадлардан иборат массив куйидагича эълон килинади: array [1..100] of real ; Массивларни эълон килиш хакида тўликрок маълумот бериш учун турли типдаги индексларга оид мисолларни эътиборингизга хавола киламиз: 1. array [1000..5000] of integer; 2. array [-754..-1] of byte; 3. array [0..100] of real; 4. array [0..10] of boolean; 5. array [10..25] of char; 6. type chegara к 1..100; vektor к array [chegara] of real; massiv1 к array [115..130] of integer; massiv2 к array [-754..-1] of integer; var A,B: vektor; c,d : massiv1; e: massiv2; 7. var

$www.arxiv.uz r, t: array [chegara] of real; s, q: array [115..130] of integer; p: array [-754..-1] of integer; k, m: array [1..50] of (shar, kub, doira); 8. type kv1 к (yanvar, fevral, mart); var t, r: array [kv1] of real; 9. type belgi к array [boolean] of integer; belgi_kodi к array [char] of integer; var k : belgi; p : belgi_kodi; Энди массивлар устида типик амаллар бажарувчи бир нечта программа билан танишиб чикайлик. 1. Бир ўлчамли, n та хадли ( n к30) массив хадларини йиғиш. Program L1; const nк30; var i: integer; x: array [1..n] of real; S: real; begin for i: к1 to n do readln (x[i]); { массив хадларини киритиш } S: к0; for i: к1 to n do S: кSк x[i] ;$

www.arxiv.uz writeln (‘ натижа к’, S) end. 2. Бир ўлчамли , n та хадли (nк30) массив хадларининг энг каттасини топиш ва унинг жойлашган жойини ани к лаш . Program L2; const nк30; type gran к 1..30; vector к array [gran] of real; var x: vector; S: real; i, k: integer; begin writeln (‘ х - массиви хадларини киритинг ’); for i: к1 to n do readln (x[i]); S: кx[1]; k: к1; for i: к2 to n do if x[i] > S then begin S: кx[i]; k: кi end; writeln (‘х массивининиг энг катта хади’); writeln (S); writeln (‘max(x) нинг ўрни ’, k) end . 3. n та хадли ( n к 15) векторларнинг скаляр кўпайтмасини аниклаш.

www.arxiv.uz Program L3; const nк15; type gran к 1..n; mas к array [gran] of real; var i: byte; S: real; x , y : mas ; begin writeln (‘х ва у массив хадларини киритинг’); for i: к1 to n do readln (x[i]); for i: к1 to n do readln (y[i]); S: к0; for i:к1 to n do S:к S к x[i] * y[i]; writeln (‘ натижа ’, S ) end. К ў п ў л ч а м л и м а с с и в л а р в а у л а р у с т и д а а м а л л а р Бир ўлчамли массивларнинг хадлари скаляр микдорлар бўлган эди. Умумий холда эса, массив хадлари ўз навбатида яна массивлар бўлиши мумкин, агар бу массивлар скаляр микдорлар бўлса, натижада икки ўлчамли массивларни хосил киламиз. Икки ўлчамли массивларга мисол сифатида математика курсидаги матрицаларни келтириш мумкин. Агар бир ўлчамли

www.arxiv.uz массивнинг хадлари ўз навбатида матрицалар бўлса натижада уч ўлчовли массивлар хосил килинади ва х.к. Икки ўлчамли массив типини кўрсатиш куйидагича бажарилади: array [<индекс типи>] of array [<индекс типи>] of <скаляр тип>; Икки ўлчамли массивларнинг типларини бир неча хил йўлда аниклашни куйидаги мисол устида кўриб чикайлик (А матрица 10 та сатр ва 20 та устундан иборат бўлиб, унинг хадлари хакийкий типга тегишли бўлсин): 1. var A: array [1..10] of array [1..20] of real; 2. type matr к array [1..10] of array [1..20] of real; var A: matr; 3. type gran1 к 1..10; gran2 к 1..20; matr к array [gran1, gran2] of real; var A: matr; 4. var A: array [1..10, 1..20] of real; Яна шуни хам айтиш мумкинки , икки ўлчамли массив индексларининг типлари турли хил хам бўлиши мумкин . Бу холни куйидаги мисол устида кўриб чикайлик : Program L1; const n к 24;

www.arxiv.uz type hafcun к (dush, sesh, chor, pay, jum, shan, yaksh); Ishkun к dush..jum; detson к array [1..n] of char; var A: array [boolean] of array [1..n] of char; B: detson; С : array [1..365] of detson; Икки ўлчамли массивлар устидаги бир нечта тугалланган программалар билан танишиб чикайлик. 1. Матрицаларни кўшиш. Program L 2; const n к 3; m к 4; { n - матрица сатрлари сони, m - устунлар сони} var i, j: integer; A, B, C: array [1..n,1..m] of real; begin {А, В матрица хадларини киритиш} for i : к 1 to n do for j: к1 to m do readln (A[i,j], B[i,j]); for i : к 1 to n do for j: к 1 to m do begin C[i,j] :к A[i,j] к B[i,j]; writeln (C[i,j]) end end. 2. Матрицани векторга кўпайтириш.

www.arxiv.uz Program L 3; const n к3; m к 4; type matr к array [1..n, 1..m] of real; vect к array [1..m] of real; var i, j: byte; A: matr; B, C: vect; begin writeln (‘ А матрица хадларини киритинг ’); for i:к1 to n do for j:к1 to m do readln (A[i,j]); writeln (‘B вектор хадларини киритинг ’); for i:к1 to n do readln (B[i]); for i:к1 to n do begin C[i]:к0; for j:к1 to m do C[i]:к C[i] к A[i,j] * B[j]; writeln (C[i]); end end. 3. Матрица хадларининг энг каттасини топиш ва унинг жойлашган жойини аниклаш. Program L4; const nк3; mк4;

www.arxiv.uz var A: array [1..n, 1..m] of real; R: real; i, j: byte; K, L: byte; begin {А матрица хадларини киритиш} for i: к1 to n do for j: к1 to m do readln (A[i,j]); R:к A[1,1]; L:к 1; K:к 1; for i: к1 to n do for j: к1 to m do begin if R< A[i,j] then begin R: кA[i,j]; L: к i; K: кj; end; end; writeln (‘max Aк’, R); writeln (‘ сатр к’,L,’ устун к’,K); end .

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.ziyonet.uz

O'xshashlar

Жадвал катталиклар дастури ва унинг имкониятлари

Электрон жадвал тушунчаси

StringGrid жадвал компонентаси

Маълумотлар базасида жадвал билан ишлаш

Электрон жадвал ва унинг имкониятлари