Răspuns :
sunt propuse doua variante din faptul ca se stie din start dimensiunile matricei se poate evita declararea matricei.... si a doua varianta foloseste vector bidimensional...
***************************************************
PROGRAM matrice3x3;
var i, num, produs: integer;
begin
write('introdu 9 elemente intregi ale matricei: ');
produs:=1;
for i:=1 to 9 do
begin
read(num);
produs:=produs*num;
end;
writeln('produsul = ', produs);
end.
****************************************************
program produs2;
var i,j, produs:integer;
a: array[1..3,1..3] of integer;
begin
writeln('introdu 9 elemente intregi ale matricei: ');
produs:=1;
for i:=1 to 3 do
begin
for j:=1 to 3 do
begin
write('a[',i,',',j,']='); read(a[i,j]);
produs:=produs*a[i,j];
end;
end;
writeln('produsul= ', produs);
end.
Vă mulțumim pentru vizita pe site-ul nostru dedicat Informatică. Sperăm că informațiile prezentate v-au fost utile. Dacă aveți întrebări suplimentare sau nevoie de ajutor, vă rugăm să ne contactați cu încredere. Așteptăm cu drag să reveniți și nu uitați să ne salvați în lista dumneavoastră de favorite!