PROVA DISCURSIVA 82%

Prévia do material em texto

17/11/2016 AVA UNIVIRTUS
http://univirtus­277877701.sa­east­1.elb.amazonaws.com/ava/web/#/ava/AvaliacaoUsuarioHistorico/105804/novo/1 1/8
Matriz Discursiva – UTA C FASE I – 17/10 ATE 04/11 [O aluno poderá utilizar o Software VisuALG]
PROTOCOLO: 201611031306168D183A3PAULA BARÃO DA SILVA - RU: 1306168 Nota: 82
Disciplina(s):
Lógica de Programação e Algoritimos
Data de início: 03/11/2016 14:11
Prazo máximo entrega: 03/11/2016 16:11
Data de entrega: 03/11/2016 14:55
Questão 1/5 - Lógica de Programação e Algoritimos
Faça um algoritmo que leia dados para um vetor de n elementos. Após a leitura de todos os elementos do vetor, o mesmo 
deverá pedir uma posição neste vetor e um novo valor. O algoritmo deverá incluir nesta posição este novo valor. Logo, os 
demais valores do vetor deverão ser empurrados para as próximas posições do vetor.
Nota: 20.0
algoritmo "vetores"
var
 
  i,n,posicao : inteiro
  valor:real
  v: vetor [1..50] de real
 
  aux: real
 
inicio
//seção de comandos
 
   escreval("Digite o número de elementos do vetor:")
   leia(n)
   para i de 1 ate n faca
     escreval("Digite um numero qualquer:")
     leia(v[i])
   fimpara
  
   escreval("Digite um valor qualquer para inserir no vetor:")
   leia(valor)
   escreval("Digite a posição do vetor")
   leia(posicao)
  
   para i de n ate 2 passo ­1 faca
      se (i>=posicao) entao

17/11/2016 AVA UNIVIRTUS
http://univirtus­277877701.sa­east­1.elb.amazonaws.com/ava/web/#/ava/AvaliacaoUsuarioHistorico/105804/novo/1 2/8
Resposta:
algorítimo "vetores" 
var 
i,j,k,n: inteiro 
v: vetor [1..50] de real 
vp: vetor [1..50] 
vn: vetor [1..50] 
aux: real 
inicio 
//Seção de comandos 
escreva 1("digite o número de elementos vetore:") 
leia (n) 
para i de 1 até n faca 
escreva 1 ("digite um número qualquer") 
leia (v[i]>0) entao 
k<­k+1 
vp [k]<­v[i] 
senao 
j<­j+1 
vn [j]<­v[i] 
fimse 
fimpara 
escreva1 ("positivos:") 
para i de 1 ate j faca 
escreva1 (vp[i]) 
fimpara 
escreva1 ("negativos:") 
         v[i+1]<­v[i]
      fimse
      se (posicao=i) entao
         v[i]<­valor
      fimse
 
   fimpara
 
   para i de 1 ate n+1 faca
      escreval(v[i])
   fimpara
 
fimalgoritmo
Conteúdo das Aulas 9 e 10.
17/11/2016 AVA UNIVIRTUS
http://univirtus­277877701.sa­east­1.elb.amazonaws.com/ava/web/#/ava/AvaliacaoUsuarioHistorico/105804/novo/1 3/8
parai de 1 ate k faca 
escreva1 (vn[i]) 
fimpara 
fimalgoritmo 
Questão 2/5 - Lógica de Programação e Algoritimos
Faça um algoritmo que leia uma matriz mXn e depois mostre os dados.
algoritmo "matriz01"
Nota: 16.0
Resposta:
var
 
  matriz:vetor[1..10,1..10] de inteiro
  i,j,m,n:inteiro
 
inicio
 
escreval("***** Entrada de Dados *****")
escreval("")
escreva("Digite o numero de linhas e o numero de colunas para matriz:")
leia(m,n)
para i de 1 ate m  faca
  para j de 1 ate n faca
       escreva("Digite um valor para linha:",i," coluna:",j,":")
       matriz[i,j]<­i+j
  fimpara
fimpara
 
limpatela
 
escreval("***** Resultados da matriz *****")
para i de 1 ate m faca
  para j de 1 ate n faca
     escreva(matriz[i,j])
  fimpara
     escreval("")
fimpara
 
fimalgoritmo

17/11/2016 AVA UNIVIRTUS
http://univirtus­277877701.sa­east­1.elb.amazonaws.com/ava/web/#/ava/AvaliacaoUsuarioHistorico/105804/novo/1 4/8
var 
matriz:vetor[1..10,1..10] de inteiro 
i,j,m,n:inteiro 
inicia 
escreval("*****entrada de dados*****") 
escreva("") 
escreva("digite o numero de linhas e o numero de colunas para matris:") 
leia(m,n) 
para i de 1 ate m faca 
para j de 1 ate n faca 
escreva("digite um valor para linha:",i," coluna:",j,":") 
matriz[i,j]<­i+j 
fimpara 
fimpara 
Questão 3/5 - Lógica de Programação e Algoritimos
Escreva um algoritmo para calcular a área de num quadrado.
Nota: 20.0
17/11/2016 AVA UNIVIRTUS
http://univirtus­277877701.sa­east­1.elb.amazonaws.com/ava/web/#/ava/AvaliacaoUsuarioHistorico/105804/novo/1 5/8
Resposta:
var 
largura, comprimento,area:inteiro 
escreval("digite a largura") 
leia (a largura) 
escreval("digite o comprimento") 
leia(o comprimento) 
area: largura*comprimento 
escreval("a area do quatrilatero corresponde ah "+a 
finalalgoritmo
Questão 4/5 - Lógica de Programação e Algoritimos
Faça um algoritmo que crie uma função de conversão de uma temperatura em graus celsius para uma temperatura em 
Farenheit.
A fórmula para conversão é: 
Nota: 6.0
algoritmo "Quadrado"
// Seção de Declarações
var
   lado, area: real
 
inicio
// Seção de Comandos
   escreval("Digite o valor para um lado: ")
   leia(lado)
   area<­lado*lado
   escreval("Area do quadrado=",area)
 
fimalgoritmo
Conteúdo da Aula 5.

17/11/2016 AVA UNIVIRTUS
http://univirtus­277877701.sa­east­1.elb.amazonaws.com/ava/web/#/ava/AvaliacaoUsuarioHistorico/105804/novo/1 6/8
Resposta:
algoritmo "convesaoCFf" 
//seçao de declaraçoes 
var  
far,celsius:real 
fancao conv(c:real):real 
var res: real 
inicio 
res<­9/5*c+32 
retorne res fumfuncao
Questão 5/5 - Lógica de Programação e Algoritimos
Faça um algoritmo que mostre uma tabela de conversão de temperaturas de Celsius para Farenheit. O algoritmo deve 
receber a temperatura inicial em graus Celsius, a quantidade de temperaturas a exibir o incremento entre temperaturas. 
Por exemplo, a primeira temperatura seria 10 com incremento 5, a próxima temperatura seria 15 e assim por diante até 
chegar na quantidade de temperaturas necessárias. 
algoritmo "conversaoCFf"
// Seção de Declarações
var
far,celsius: real
 
funcao conv(c:real):real
var res: real
inicio
 
res<­9/5*c+32;
retorne res
fimfuncao
 
inicio
// Seção de Comandos
 
escreval("Informa a temperatura inicial em Graus Celsius:")
leia(celsius)
 
far<­conv(celsius)
 
escreval("Temperatura em Farehneit:", far)
 
fimalgoritmo
Conteúdo da Aula 8.

17/11/2016 AVA UNIVIRTUS
http://univirtus­277877701.sa­east­1.elb.amazonaws.com/ava/web/#/ava/AvaliacaoUsuarioHistorico/105804/novo/1 7/8
A fórmula para conversão é: 
Nota: 20.0
Resposta:
algoritmo "conversaoCF" 
//seção de declaraçoes 
var 
celsius, far, celsius_inicial: real 
qt_temp, incremento,i:inteiro 
inicio 
//seçao de comandos 
escreval("informar a temperatura inicial em graus celsius:") 
leia(celsius_inicial) 
algoritmo "conversaoCF"
// Seção de Declarações
var
celsius, far, celsius_inicial : real
qt_temp, incremento,i:inteiro
inicio
// Seção de Comandos
 
escreval("Informa a temperatura inicial em Graus Celsius:")
leia(celsius_inicial)
escreval("Informa a quantidade de temperaturas da tabela:")
leia(qt_temp)
escreval("Informe o incremento de temperatura em Graus Celsius")
leia(incremento)
 
celsius<­celsius_inicial
para i de 1 ate qt_temp faca
   far<­9/5*celsius+32;
   celsius<­celsius+incremento
   escreva(i," ­ ")
   escreval("Celsius:",celsius)
   escreval("Farenheit:",far)
   escreval("")
fimpara
 
fimalgoritmo
Conteúdo das Aulas 5 e 6.

17/11/2016 AVA UNIVIRTUS
http://univirtus­277877701.sa­east­1.elb.amazonaws.com/ava/web/#/ava/AvaliacaoUsuarioHistorico/105804/novo/1 8/8
escreval("informa a quantidade de temperaturas da tabela:") 
leia(qt_temp) 
escreval("informe o incremento de temperatura em graus celsius") 
leia(incremento) 
celsius<­celsius_inicial 
para i de 1 ate qt_temp faca 
far<­9/5*celsius+32 
celsius<­celsius+incremento 
escreva(i,"­") 
escreval("celsius:",celsius) 
escreval("farenheit:",far)