Questões de Vestibular Sobre 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 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 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.
Para responder a essa questão, considere o programa em Pascal Matriz.
program Matriz;
var
m: array [1..5, 1..5] of integer;
i, j: integer;
begin
for i := 1 to 5 do
for j := 1 to 5 do
readln(m[i,j]);
for i := 1 to 5 do
writeln(m[i, 6-i]);
end.
Para responder a essa questão, considere o programa em Pascal Matriz.
program Matriz;
var
m: array [1..5, 1..5] of integer;
i, j: integer;
begin
for i := 1 to 5 do
for j := 1 to 5 do
readln(m[i,j]);
for i := 1 to 5 do
writeln(m[i, 6-i]);
end.
Para responder a essa questão, considere o programa em Pascal Matriz.
program Matriz;
var
m: array [1..5, 1..5] of integer;
i, j: integer;
begin
for i := 1 to 5 do
for j := 1 to 5 do
readln(m[i,j]);
for i := 1 to 5 do
writeln(m[i, 6-i]);
end.
Para responder a essa questão, considere a função em Pascal F.
function F(n : integer): integer;
begin
if (n = 1) or (n = 2) then
F := 1
else
F := F(n-2) + F(n-1);
end;
Para responder a essa questão, considere a função em Pascal F.
function F(n : integer): integer;
begin
if (n = 1) or (n = 2) then
F := 1
else
F := F(n-2) + F(n-1);
end;