Questões de Vestibular de Programação
Foram encontradas 32 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.
aux := v[i]; v[i] := v[11-i]; v[11-i] := aux;
pelo bloco de comandos
v[i] := v[11-i]; v[11-i] := v[i];
que o programa funcionaria da mesma forma.
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.
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.
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.
Conheça nossos planos