Prova Discursiva

Prévia do material em texto

08/06/2016 AVA UNIVIRTUS
http://univirtus-277877701.sa-east-1.elb.amazonaws.com/ava/web/#/ava/AvaliacaoUsuarioHistorico/71003/novo/1 1/7
Matriz Discursiva UTA A FASE II – 16/05 até 03/06 [O aluno poderá estar utilizando o Software VisuALG]
PROTOCOLO: 2016060212839828F256EJOSE CARLOS LOPES DA SILVA - RU: 1283982 Nota: 82
Disciplina(s):
Lógica de Programação e Algoritmos
Data de início: 02/06/2016 18:21
Prazo máximo entrega: 02/06/2016 19:51
Data de entrega: 02/06/2016 19:51
Questão 1/5
Faça um algoritmo que escreva os quadrados de todos os números pares entre 1 e 20 (inclusive).
Nota: 20.0
Resposta:
var
i: inteiro
 
inicio
escreval('' Quadrado dos muneros pares entre 1 e 20'')
para i de 2 ate 20 posso 2 faca
 escreva( i*i)
fimpara
algoritmo "quadrados"
// Seção de Declarações
var
i:inteiro
 
inicio
// Seção de Comandos
 
escreval("Quadrados dos numeros pares entre 1 e 20")
para i de 2 ate 20 passo 2 faca
 escreva(i*i)
fimpara
fimalgoritmo
Conteúdo da Aula 7.

08/06/2016 AVA UNIVIRTUS
http://univirtus-277877701.sa-east-1.elb.amazonaws.com/ava/web/#/ava/AvaliacaoUsuarioHistorico/71003/novo/1 2/7
fimalgoritimo
Questão 2/5
Faça um algoritmo que leia um valor que corresponda ao tempo de produção em horas e um valor que represente o custo 
em reais da produção. Mostre a mensagem conforme a tabela abaixo:
Tempo Valor Mensagem
<0.5 <50,00 Ideal
>=1.0 >50,00 Inviável
>=0.5 e <1.0 <50,00 Viável
Nota: 20.0
Resposta:
// Algoritimo '' Producao''
var
algoritmo "producao-viavel"
// Seção de Declarações
var
 tempo: real
 valor:real
inicio
// Seção de Comandos
escreva("Digite o tempo de produção em horas")
leia(tempo)
escreva("Digite o custo em reais")
leia(valor)
 
se (tempo<0.5) e (valor<50.00) entao
 escreval("Ideal")
fimse
se ((tempo>=0.5) e(tempo<1.0)) e (valor<50.00) entao
 escreval("Viavel")
fimse
se (tempo>=1.0) e (valor>50.00) entao
 escreval("Inviavel")
fimse
fimalgoritmo
 Conteúdo da Aula 6.

08/06/2016 AVA UNIVIRTUS
http://univirtus-277877701.sa-east-1.elb.amazonaws.com/ava/web/#/ava/AvaliacaoUsuarioHistorico/71003/novo/1 3/7
tempo, valor: real
 valor: real
inicio
escreva('' Digite o tempo de producao em horas'')
leia( tempo)
escreva('' Digite o valor em reais'')
leia(valor)
se (tempo < 0,5) e (valor < 50,00) entao
 escreval('' ideal'')
fimse
 
se ((tempo>=1,0)) e (tempo<1.0))e(valor>50,00) entao
 escreval(''viavel'')
 
fimse
 
se (tempo>=1.0) e (valor>50.00) entao
 escreva('' inviavel'')
fimse
 fimalgoritimo 
Questão 3/5
Escreva um algoritmo para calcular a área de num quadrado.
Nota: 20.0
Resposta:
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.

08/06/2016 AVA UNIVIRTUS
http://univirtus-277877701.sa-east-1.elb.amazonaws.com/ava/web/#/ava/AvaliacaoUsuarioHistorico/71003/novo/1 4/7
// Algoritimo area de um quadrado
// Autor: Jose carlos Lopes da Silva
var
lado: real
 
inicio
escreva('' Digite o tamanho de um lado do quadrado'')
leia(lado)
escreva('' A area:'',( lado* lado) .'' metros quadrados.'')
fimalgoritimo
Questão 4/5
Faça um algoritmo que exiba um relatório de Totais e % por faixa-etária e sexo no seguinte formato:
 
"*** Totais por faixa-etária e sexo ***
Número de meninas:
Número de mulheres:
Número de meninos:
Número de homens:
Total geral:
 
% de meninas:
% de mulheres:
% de meninos:
% de homens:
Nota: 6.0
algoritmo "estat"
var
x, idade,qt,fem_maior, fem_menor,masc_maior, masc_menor: inteiro
sexo:caracter
 
inicio
// Seção de Comandos
escreval("Digite a quantidade de entradas:")
leia(qt)
enquanto x < qt faca
 
 escreva("Digite uma idade: ")
 leia(idade)
 escreva("Digite o sexo (f/m): ")

08/06/2016 AVA UNIVIRTUS
http://univirtus-277877701.sa-east-1.elb.amazonaws.com/ava/web/#/ava/AvaliacaoUsuarioHistorico/71003/novo/1 5/7
Resposta:
var
x,idade,qt,fem-maior,fem-menor, masc-maior, mascmenor,: inteiro
sexo:caracter
 inicio
escreval('' A quantidade de entrda''0
leia(qt)
 leia(sexo)
 
 se (idade<18) e (sexo="f") entao
 fem_menor<-fem_menor+1
 fimse
 
 se (idade<18) e (sexo="m") entao
 masc_menor<-masc_menor+1
 fimse
 
 se (idade>=18) e (sexo="f") entao
 fem_maior<-fem_maior+1
 fimse
 
 se (idade>=18) e (sexo="m") entao
 masc_maior<-masc_maior+1
 fimse
 
 
x<-x+1
fimenquanto
 
 escreval("*** Totais por faixa-etária e sexo ***")
 escreval("Número de meninas: ",fem_menor)
 escreval("Número de mulheres: ",fem_maior)
 escreval("Número de meninos: ",masc_menor)
 escreval("Número de homens: ",masc_maior)
 escreval("Total geral:",qt)
 
 escreval("% de meninas: ",fem_menor*100/qt," %")
 escreval("% de mulheres: ",fem_maior*100/qt," %")
 escreval("% de meninos: ",masc_menor*100/qt," %")
 escreval("% de homens: ",masc_maior*100/qt," %")
 
fimalgoritmo
Conteúdo das Aulas 9 e 10.
08/06/2016 AVA UNIVIRTUS
http://univirtus-277877701.sa-east-1.elb.amazonaws.com/ava/web/#/ava/AvaliacaoUsuarioHistorico/71003/novo/1 6/7
enquanto x<qt faca
escreva('' Digite uma idade:'')
leia(idade)
escreva(''Digite o sexo (f/m:''):'')
leia(sexo)
se ( idade < 18) e (sexo=''f'') entao
 fem
Questão 5/5
Faça um algoritmo que leia uma matriz mXn e depois mostre os dados.
algoritmo "matriz01"
Nota: 16.0
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

08/06/2016 AVA UNIVIRTUS
http://univirtus-277877701.sa-east-1.elb.amazonaws.com/ava/web/#/ava/AvaliacaoUsuarioHistorico/71003/novo/1 7/7
Resposta:
var
matriz:vetor[1..10, 1..10] de inteiro
i,j,m,n:inteiro
inicio
escreva(''digite o numero de linhas e colunas'')
leia(m,n)
para i de 1 ate m faca
para j de 1 ate n faca
escreva(''digite o valor para linha:''i'', coluna:''j,'':'')
leia( matriz[i,,j]]
fimpara
fimpara
limpatela
escreva('' Resultado'')
para i de 1 ate m faca
para j de 1 ate n faca
escreva(matriz[i,j])
fimpara
escreva('' '')
fimpara
fimalgoritimo