Question

Escreva um programa que declare e inicialize (no próprio algoritmo, com valores diversos) uma matriz 2x3 e multiplique todos os elementos da matriz por um número NUM digitado pelo usuário. No final, o programa deve imprimir todos os elementos da matriz.

Answer 1

Program Exemplo ;

var

vetor: array[1..2,1..3] of integer ;

num, valores, l , c: integer;

Begin

 writeln('Informe um número');

 read(num);

 for l:= 1 to 2 do

 begin

   for c := 1 to 3 do

   begin

     vetor[l][c]:=random(6);

     vetor[l][c]:= vetor[l][c] * num;

     if (l = 1) and (c = 1) then

     begin

       writeln();

       writeln('Novos valores');

       writeln(vetor[l][c])

     end

     else

     begin

       writeln(vetor[l][c]);

     end;

   end;

 end;

End.