Sem postar aqui?

terça-feira, março 31st, 2009

Program matriz4×5;
const
max1=4;
max2=5;

var
soma,i,j:integer;
mat: array[1..max1,1..max2] of integer;
begin
for i:=1 to max1 do
begin
for j:=1 to max2 do
begin
writeln(’Informe o valor da matriz: ‘);
readln(mat[i,j]);
soma:=soma+mat[i,j];
end;
writeln(’O valor da soma da linha ‘,i,’ e: ‘,soma);
soma:=0;
end;
readln;
end.

Uma matriz 4×5 que soma todos os valores inseridos em linha e em seguida exibe o valor da soma…

;)

Related Posts with Thumbnails

Get Adobe Flash playerPlugin by wpburn.com wordpress themes