AD 2 Computação I 2018.1 Gabarito final V2

Prévia do material em texto

UNIVERSIDADE FEDERAL FLUMINENSE 
ESCOLA DE ENGENHARIA INDUSTRIAL METALÚRGICA DE VOLTA REDONDA 
CURSO DE ENGENHARIA DE PRODUÇÃO 
Fundação Centro de Ciências e Educação Superior a Distância do Estado do Rio de Janeiro 
Centro de Educação Superior a Distância do Estado do Rio de Janeiro 
 
Gabarito Avaliação a Distância – AD2 
2018.1 
Disciplina: Computação I 
Coordenador da Disciplina: Edgar Eller Junior 
 
1) (1,0 pt) 
Algoritmo Calculo_e() 
Início 
 Real r 
 Inteiro n, num, fnum, i 
 Imprimir "Digite o valor para calculo de e" 
 Ler n 
 num = 1 
 r = 1 
 Enquanto (n>=num) Faça 
 fnum = 1 
 Para (i=1; i<=num; i=i+1) Faça 
 fnum = fnum*i 
 Fim Para 
 r = r + (1/fnum) 
 num=num+1 
 Fim Enquanto 
 Imprimir "O valor de e igual a:" + r 
Fim 
 
2) (2,0 pts) 
Algoritmo adjProd( ) 
Inicio 
Inteiro i, produto=0, temp, vetor[800] 
Para ( i = 0 ; i<800 ; i=i+1 ) Faça 
 Imprimir “Digite um número não nulo da posição” + i 
Ler vetor[i] 
Fim Para 
 Para ( i = 0 ; i<796 ; i=i+1 ) Faça 
 temp = vetor[i] * vetor[i+1] * vetor[i+2] * vetor[i+3] * vetor[i+4] 
 Se ( temp >produto ) Então 
 produto = temp 
 Fim Se 
Fim Para 
Imprimir “O valor do maior produto entre 3 números adjacentes é:” + produto 
Fim 
 
 
 
3) (2,0 pts) 
Início 
 Inteiro [][]mat = Inteiro [20][20] 
 Inteiro i, j, valor, linha, coluna 
 Logico x=Falso 
 Imprimir "Digite os valores da matriz 20x20" 
 Para (i=0;i<20;i=i+1) Faça 
 Para (j=0;j<20;j=j+1) Faça 
 Leia mat[i][j] 
 Fim Para 
 Fim Para 
 Imprimir " Digite o número a ser buscado na matriz" 
 Ler valor 
 Para (i=0;i<20;i=i+1) Faça 
 Para (j=0;j<20;j=j+1) Faça 
 Se (valor==mat[i][j]) Então 
 linha = i 
 coluna = j 
 x = Verdadeiro 
 
 Fim Para 
 Fim Para 
 Se (x) Então 
 Imprimir "O valor" + valor + " foi encontrado na linha" + linha + " coluna" 
+ coluna 
 Senão 
 Imprimir "O valor" + valor + " não foi encontrado" 
 Fim Se 
Fim 
 
 
4) (3,0 pts). 
Procedimento calcVar( Real[ ] Dados, Inteiro N ) 
Inicio 
Inteiro i, soma=0, med, temp=0, var 
Para ( i=0 ; i<N ; i=i+1 ) Faça 
 soma = soma + Dados[i] 
Fim Para 
med = soma / N 
Para ( i=0 ; i<N ; i=i+1 ) Faça 
 temp = temp + ( Dados[i] - med )^2 
Fim Para 
var = temp / N 
Imprimir “A variância da distribuição é: “ + var 
Fim 
 
 
 
 
 
 
 
 
 
 
 
5) (2,0 pts) 
Inteiro maximoR( Inteiro[ ] v, Inteiro n ) 
Inicio 
Se (n == 1) Então 
 Retorne v[0] 
Senão 
Inteiro x 
 x = maximoR (V, n-1) 
 Se (x > v[n-1]) Então 
 Retorne x 
 Senão 
 Retorne v[n-1] 
 Fim Se 
Fim Se 
Fim