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 că ați ales să vizitați platforma noastră dedicată Informatică. Sperăm că resursele disponibile v-au fost de ajutor. Pentru întrebări sau asistență suplimentară, nu ezitați să ne contactați. Ne bucurăm să vă revedem în curând și vă invităm să ne salvați în lista de site-uri preferate!