Matriz Bidimensional

[gisaapereira]

{25) Ler uma matriz SOMA 4x4, calcular e escrever as seguintes somas:

a) da linha 3

da coluna 2

c) de todos os elementos da matriz}

Program Pzim ;


var soma: array[1..4,1..4] of integer;

     i,j,s : integer;

 Begin

  for i:=1 to 4 do begin

    for j:=1 to 4 do begin

     writeln(' Escreva os numeros da matriz',i,j);

     readln(soma[i,j]);

     end;end;

     

 s:=0;

 for i:=1 to 4 do begin

   for j:=1 to 4 do 

   s:=s+1;

   end;

  Begin  

  writeln(' Soma da matriz',s);

  end;

   



  

 End.

PS: Gente eu fiz este programa mais não tenho ideia como faço pra somar a linha tres e a coluna dois, só consegui fazer a soma de todos os elementos no caso item c, podem me ajudar?

[felipe-rj]

As posições da sua matriz estão assim:

 

11 12 13 14

21 22 23 24

31 32 33 34

41 42 43 44

 

Repara que os elementos da linha 3 começam com 3 (i = 3) e os elementos da coluna 2 terminam com 2 (j = 2).

Então, pra somar os elementos da linha 3 faz novamente um for dentro do outro, mas antes de somar os elementos verifica se i = 3.

Para somar os elementos da coluna 2 é só seguir o mesmo raciocínio acima.

 

Ah! Uma coisa que reparei é que você não está somando os valores, está apenas incrementando de 1 em 1 a variável s, estou falando desta linha:

s:=s+1;

Essa soma vai ser sempre 16 (porque existem 16 posições na matriz). Tem que corrigir isso.

 

Caso não tenha entendido, posta aí...

[gisaapereira]

Ah sim, então, não consigui interpretar o exercicio de forma correta, muito obrigada ;D

consegui*