1. Dacă valorile elementelor matricei sunt determinate înainte de începerea programului, adică sunt cunoscute în etapa de formulare a sarcinii de programare, se poate folosi următoarea metodă:
CONST A: ARRAY [1..10] de REAL = (0,1, -15,3, 7, 0, -11,89, 4, -78,11,2, 1,0,01);
Exemplul 29. Ca urmare a măsurării unui parametru aleator, se formează o serie de numere N reale. Calculați media empirică
și abaterea standard
Denumim M = și S =. atunci algoritmul de program va arata ca.
După cum am discutat, introducerea unei matrice este o instrucțiune care conține mai mulți operatori, inclusiv operatorul buclă FOR. Dar aici și în toate exemplele de mai jos nu vom specifica modul de a introduce o matrice unidimensională, lăsând alegerea pentru programator.
PROGRAM PR29;
CONST N = 10;
VAR
X: ARRAY [1. N] de REAL;
I: INTEGER;
S, M: REAL;
BEGIN
WRITELN ('Introduceți matricea X, de la', N: 2, 'numere reale');
PENTRU I: = 1 TO N DO CITEȘTE (X [I]);
M: = 0;
S: = 0;
FOR I: = 1 până la N DO M: = M + X [I];
M: = M / N;
FORMULA I: = 1 TO N DO S: = S + (X [I] - M) * (X [I] -M);
S: = SQRT (S / (N-l));
WRITELN ('M -', M: 10: 6, ', S =', S: 9: 6);
END.
Afișează valorile unui tablou unidimensional pe ecran.
- Apoi primul mod de a scoate elemente de matrice la un șir va avea o instrucțiune:
WRITELN ("Elementele matricei A au valorile:");
PENTRU I: = M la N scrieți (A [I]: C: D, '');
writeln;
În această instrucțiune, prima declarație WRITELN îi spune operatorului ce informații se va afișa pe ecran. A doua instrucțiune va forma un șir de numere reale separate de spații în formatul: C: D. Al treilea operator WRITELN va muta cursorul pe o linie nouă.
- A doua metodă furnizează ieșirile valorilor elementelor matrice într-o coloană, fiecare dintre acestea urmând a fi identificate:
PENTRU I: = M la N nu scrie ('A,': 2, '] -', A [I]: C: D);