Questões

Para responder a essa questão, considere o programa em Pascal a seguir.

type

     Aluno = record

     nome: string[40];

     data_nascimento: string[10];

     serie: integer;

     turma: string[10];

 end;

var

     Alunos: array [1..50] of Aluno;

Para responder a essa questão considere o programa em Pascal InverteVetor.

program InverteVetor;

var

    v: array [1..10] of integer;

    i, aux: integer;

begin

    for i := 10 downto 1 do

       readln(v[i]);

 for i := 1 to 10 do

 begin

   aux := v[i];

   v[i] := v[11-i];

   v[11-i] := aux;

 end;

 for i := 1 to 10 do

     writeln(v[i]);

end.