Екіөлшемді массив.. Жаа саба екілшемді массив
Скачать 85.41 Kb.
|
Жаңа сабақЕКІӨЛШЕМДІ МАССИВЕкіөлшемді массив Екіөлшемді массивті тіктөртбұрышты кесте түрінде енгізуге болады. Кестенің әрбір элементінің екі индексі болады, олардың мәні элементтің орнын көрсетеді. Математикада квадрат және тіктөртбұрышты кестені матрица деп атайды. Бірінші индекс- жол нөмірі, тек келесі жолға ауысқанда ғана өзгереді; екінші индекс – баған нөмірі. m жолдан және n бағаннан тұратын кестені m*n өлшемді кесте деп атайды.
i=1 i=2 i=3 i=m j=1 j=2 j=3 j=4 j=n Бірінші индекс-жол нөмірі Екінші индекс-баған нөмірі Екіөлшемді массивтің сипатталуыConst n=…; m=…; {массив өлшемі}VAR массив аты: ARRAY [1..n,1..m] OF элементтер типі;Мысалы: 5 жолдан және 6 бағаннан барлығы 30 бүтін элементтен тұратын А массивін сипаттау.Жазылуы:VAR А: ARRAY[1..5,1..6] OF INTEGER;Екіөлшемді массивтің сипаттаңыз1) Берілген массивте неше жол, неше баған? 2) Берілген массивті сипаттаңыз. 3) Массивтің элементтерінің мәнін ата: A[1,3]= , A[3,1]= , A[2,2]= 4) Массивтің мәндері бойынша орнын анықта A[ ..,..]= 10, A[..,..]= 3, A[ ..,..]= -7
Жауабы:
Екіөлшемді массивтермен жұмыстың негізгі алгоритмдері Екіөлшемді массивті толтыру. А массиві 3 жолдан және 4 бағаннан тұрады. Барлығы 3*4=12 элемент.
1 3 -6 7 8 -5 3 12 2 -7 8 10 Әр жол элементтерінің қосындысын есептеу. Бірөлшемді массив элементтерінің қосындысын есептейтін негізгі алгоритмді қолданамыз және жолдар қанша болса сонша рет қайталаймыз. Program М1; Var a: array[1..3,1..4] of integer; i, j, S: integer; Begin For i:=1 to 3 do For j:=1 to 4 do read(a[i,j]); FOR i:=1 to 3 DO begin S:=0; FOR j:=1 to 4 DO S:=S+A[i,j]; WRITELN(I,’ жол қосындысы= ’ , S); End; Readln; End. КВАДРАТ МАТРИЦА Жолдар саны мен бағандар саны сәйкес келетін екіөлшемді массивті квадрат матрица деп атайды. Мысалы: Var A: array [1..4,1..4] of integer; {Массивтің барлық элементтері бүтін сандар}
Тапсырма. A[1..3,1..3] квадрат матрицасының бас диагоналінде орналасқан элементтерінің қосындысын есепте. Program М1; Const n=3; Var a: array[1..n,1..n] of integer; i, j, S: integer; Begin For i:=1 to n do For j:=1 to n do read(a[i,j]); S:=0; For i:=1 to n do For j:=1 to n do If i= j then S:=S+a[i,j]; Writeln(‘диагональ элементтерінің қосындысы тең= ‘,S); Readln; End. Үйге тапсырма беру. І. §23 113 бет ІІ. Үй тапсырмасы. Сабақ аяқталды Сау болыңыздар |