Matricea bidimensională pascal, primar și secundar diagonal

Matricea bidimensională Pascal

Matricea sau matrice bidimensional - un tablou dreptunghiular de numere (sau alte elemente de același tip). Fiecare element de matrice are două index (numărul de rând și numărul coloanei).

Date inițiale pentru rezolvarea multor probleme pot fi prezentate sub formă de tabel:

Tabelul rezultatelor activităților de producție a mai multor unități de afaceri pot fi reprezentate după cum urmează:

zavod1: array [1..4] din întreg; zavod2: array [1..4] din întreg; zavod3: array [1..4] din întreg;

Sau ca o matrice bidimensională ca aceasta:

var A: array [1..3,1..4] din întreg;

Elemente Descriere, intrare și ieșire matrice bidimensională

Descriere Opțiuni de matrice bidimensională

1. Descrierea secțiunii variabile matrice:

var A: array [1..5,1..5] din întreg; i, j: integer; suma, sum1, sum2: integer; începe Aleator; pentru i: = 1 până la 5 pentru a face j: = 1 până la 5 do A [i, j]: = random (10); scrie ( 'sursă array A:'); pentru i: = 1 până la 5 do începe writeln; pentru j: = 1 până la 5 do write (A [i, j]: 2, ''); se încheie; sum1: = 0; pentru i: = 1 până la 5 pentru a face j: = 1 până la 5 do if (i-j = 1) apoi sum1: = sum1 + A [i, j]; sum2: = 0; pentru i: = 1 până la 5 pentru a face j: = 1 până la 5 do if (j-i = 1) apoi sum2: = sum2 + A [i, j]; Suma: = sum1 + sum2; writeln; writeln ( 'Suma =', suma); end.

Setarea matrice 6: Generarea unei matrice de dimensiune n. Adu-l pe ecran. Apoi convertiți prin înlocuirea elementelor necesare 0:

array Setarea 7: Elaborarea unei matrice de dimensiune n. Adu-l pe ecran. Apoi convertiți prin înlocuirea elementelor necesare 0:

array Setarea 8: Dezvoltarea unei matrice de dimensiune n. Adu-l pe ecran. Apoi convertiți prin înlocuirea elementelor necesare 0:

Target matrice 9: Crearea unui program care permite utilizarea unui generator de numere aleatoare pentru a genera o matrice de dimensiune N. Definiți:

elementul minimal, care se află sub secundar diagonală

produs de elemente nenule ale ultimului rând

Luați în considerare un alt exemplu de lucru cu matrice bidimensională.

Exemplu: Într-o matrice bidimensională a elementelor M dimensiune N x determina valoarea medie. Găsiți indicele matrice al elementului care este cel mai apropiat de valoarea medie.

var index1, index2, i, j, N, M: integer; s, min, f: real; a: array [1..300,1..300] real; începe N: = 10; M: = 5; pentru i: = 1 la N se începe pentru j: = 1 până la M face începe o [i, j]: = random (20); s: = s + a [i, j]; scrie (a [i, j]: 3); se încheie; writeln; se încheie; f: = s / (N * M); writeln ( 'znachenie srednee', f); min: = abs (a [1,1] -f); pentru i: = 1 la N do începe pentru j: = 1 M nu înceapă dacă abs (a [i, j] -f)

Și acum ne propunem să treacă un test de la nivelul inițial de programare Pascal. Urmați link-ul sau faceți clic aici. dacă aveți parola pentru test.