Главная страница
Рефераты
Информатика и ИТ
Массивлар (жадвал катталиклар)
Массивлар (жадвал катталиклар)
Загружено в:
20.09.2019
Скачано:
0
Размер:
58.5 KB
Скачать
Похожие
Жадвал катталиклар дастури ва унинг имкониятлари
Электрон жадвал тушунчаси
StringGrid жадвал компонентаси
Маълумотлар базасида жадвал билан ишлаш
Электрон жадвал ва унинг имкониятлари
![www.arxiv.uz М а с с и в л а р х а к и д а у м у м и й м а ъ л у м о т л а р Биз шу пайтгача кийматларнинг оддий (скаляр) типларидан фойдаланиб, турли хил программалар яратишни ўргандик. Скаляр типга тегишли хар бир киймат ягона маълумот хисобланиб, тривиал структурага эгадир. Амалда эса, турли хил хосилавий типлар билан ишлашга, улардан фойдаланиб мураккаб программалар яратишга тўғри келади. Бу типларга тегишли кийматларнинг хар бири тривиал бўлмаган структурага эга, яъни бу кийматлар ўз навбатида яна бир нечта кийматлардан ташкил топади. Энди шундай типлардан бири бўлган, программалашда энг кўп кўлланиладиган программа объекти – массивлар билан танишиб чикамиз. Б и р ў л ч а м л и м а с с и в л а р в а у л а р у с т и д а а м а л л а р Массив - бу бир хил типли, чекли кийматларнинг тартибланган тўпламидир. Массивларга мисол сифатида математика курсидан маълум бўлган векторлар, матрицалар ва тензорларни кўрсатиш мумкин. Программада ишлатилувчи барча массивларга ўзига хос исм бериш керак. Массивнинг хар бир хадига мурожаат эса, унинг номи ва ўрта кавс ичига олиб ёзилган тартиб хади оркали амалга оширилади: <массив номи> [<индекс>] бу ерда <индекс> - массив хадининг жойлашган ўрнини англатувчи тартиб киймати. Умуман олганда, <индекс> ўрнида <ифода> катнашиши хам мумкин. Индексни ифодаловчи ифоданинг типини – индекс типи деб аталади. Индекс типининг кийматлар тўплами албатта номерланган тўплам бўлиши, шу билан бир каторда, массив хадлари сонини аниклаши ва уларнинг тартибини белгилаши керак.](/data/documents/eb1dcf17-cb7c-4424-bf2e-11bcdb2dd175/page-2.png)
![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](/data/documents/eb1dcf17-cb7c-4424-bf2e-11bcdb2dd175/page-3.png)
![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] ;](/data/documents/eb1dcf17-cb7c-4424-bf2e-11bcdb2dd175/page-4.png)
![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) векторларнинг скаляр кўпайтмасини аниклаш.](/data/documents/eb1dcf17-cb7c-4424-bf2e-11bcdb2dd175/page-5.png)
![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. К ў п ў л ч а м л и м а с с и в л а р в а у л а р у с т и д а а м а л л а р Бир ўлчамли массивларнинг хадлари скаляр микдорлар бўлган эди. Умумий холда эса, массив хадлари ўз навбатида яна массивлар бўлиши мумкин, агар бу массивлар скаляр микдорлар бўлса, натижада икки ўлчамли массивларни хосил киламиз. Икки ўлчамли массивларга мисол сифатида математика курсидаги матрицаларни келтириш мумкин. Агар бир ўлчамли](/data/documents/eb1dcf17-cb7c-4424-bf2e-11bcdb2dd175/page-6.png)
![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;](/data/documents/eb1dcf17-cb7c-4424-bf2e-11bcdb2dd175/page-7.png)
![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. Матрицани векторга кўпайтириш.](/data/documents/eb1dcf17-cb7c-4424-bf2e-11bcdb2dd175/page-8.png)
![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;](/data/documents/eb1dcf17-cb7c-4424-bf2e-11bcdb2dd175/page-9.png)
![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 .](/data/documents/eb1dcf17-cb7c-4424-bf2e-11bcdb2dd175/page-10.png)
