PROVA DISCURSIVA Lógica de Programação e Algorítmos

Prévia do material em texto

16/04/2016 AVA UNIVIRTUS
http://univirtus­277877701.sa­east­1.elb.amazonaws.com/ava/web/#/ava/AvaliacaoUsuarioHistorico/59750/novo/1 1/8
Matriz Discursiva UTA A FASE I – 21/03 até 08/04 [O aluno poderá estar utilizando o Software VisuALG]
PROTOCOLO: 201603221260111769A1EJOSÉ CARLOS CANTARINI FILHO - RU: 1260111 Nota: 92
Disciplina(s):
Lógica de Programação e Algoritmos
Data de início: 23/03/2016 18:09
Prazo máximo entrega: 23/03/2016 19:39
Data de entrega: 23/03/2016 19:16
Questão 1/5
Faça um algoritmo que leia uma matriz mXn e depois mostre os dados.
algoritmo "matriz01"
Nota: 20.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

16/04/2016 AVA UNIVIRTUS
http://univirtus­277877701.sa­east­1.elb.amazonaws.com/ava/web/#/ava/AvaliacaoUsuarioHistorico/59750/novo/1 2/8
Resposta:
algoritimo "matriz01" 
var 
matriz:vetor[1..10,1..10] de inteiro 
i,j,m,n:inteiro 
inicio 
escreva("Digite o numero de linhas da matriz:") 
leia(m) 
escreva("Digite o numero de colunas da matriz:") 
leia(n) 
para i de 1 ate m faca 
para j de 1 ate n faca 
escreva("Digite um valor para linha:",i,"Digite um valor para coluna:",j) 
matriz[i,j]<­1+j 
fimpara 
fimpara 
\\Resultado 
para i de 1 ate m faca 
para j de 1 ate n faca 
escreva(matriz[i,j]) 
fimpara 
escreval("") 
fimpara 
fimalgoritimo
Questão 2/5
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. 
A fórmula para conversão é:   
Nota: 16.0
 
fimalgoritmo
algoritmo "conversaoCF"
// Seção de Declarações
var

16/04/2016 AVA UNIVIRTUS
http://univirtus­277877701.sa­east­1.elb.amazonaws.com/ava/web/#/ava/AvaliacaoUsuarioHistorico/59750/novo/1 3/8
Resposta:
algoritimo "conversao" 
var 
cel,far,cel_ini:real 
i,qt_temp,inc:inteiro 
inicio 
escreval("Digite a temperatura inicial em graus Celsius: ") 
leia(cel_ini) 
escreval("Digite a quantidade de temperaturas: ") 
leia(qt_temp) 
escreval("Digite o incremento para temperatura em graus Celsius:") 
leia(inc) 
cel<­cel_ini 
para i de 1 ate qt_temp faca 
far<­9/5*cel+32 
cel<­cel+inc 
escreva(i) 
escreval("Celsius: ",cel) 
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.
16/04/2016 AVA UNIVIRTUS
http://univirtus­277877701.sa­east­1.elb.amazonaws.com/ava/web/#/ava/AvaliacaoUsuarioHistorico/59750/novo/1 4/8
escreval("Farenheit: ",far) 
escreval("") 
fimpara 
fimalgoritimo
Questão 3/5
Faça um algoritmo que leia n números. Exiba a soma dos quadrados de todos os números.
Nota: 16.0
Resposta:
algoritimo "soma" 
var 
algoritmo "Soma_quadrados"
// Seção de Declarações
var
n,i:inteiro
soma,valor:real
 
inicio
// Seção de Comandos
 
escreval("Soma dos Quadrados")
 
escreval("")
escreval("Digite o número de valores:")
leia(n)
escreval("")
 
soma<­0
para i de 2 ate n faca
    escreval("Digite um valor:")
    leia(valor)
    soma<­soma+(valor*valor)
fimpara
 
escreval("Soma dos quadrados=",soma)
 
fimalgoritmo
Conteúdo das Aulas 5 e 6.

16/04/2016 AVA UNIVIRTUS
http://univirtus­277877701.sa­east­1.elb.amazonaws.com/ava/web/#/ava/AvaliacaoUsuarioHistorico/59750/novo/1 5/8
i,n:inteiro 
soma,valor:real 
inicio 
escreva("Digite um numero de valores:") 
leia(n) 
escreval("") 
soma<­0 
para i de 2 ate n faca 
escreval("Digite um valor: ") 
leia(valor) 
soma<­soma+(valor*valor) 
fimpara 
escreval("A soma dos quadrados é: ",soma) 
fimalgoritimo
Questão 4/5
Dentro da maneira como o computador manipula informações, numa linguagem de programação há tipos primitivos
básicos utilizados para construção de programas. Quais são? 
Nota: 20.0
Resposta:
Inteiro 
Caracter 
Real 
Lógico
Questão 5/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:
 
São os tipos inteiro, caracter, real e lógico. 
Conteúdo da Aula 3, Slide 3.

16/04/2016 AVA UNIVIRTUS
http://univirtus­277877701.sa­east­1.elb.amazonaws.com/ava/web/#/ava/AvaliacaoUsuarioHistorico/59750/novo/1 6/8
% de meninas:
% de mulheres:
% de meninos:
% de homens:
Nota: 20.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): ")
     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 ***")

16/04/2016 AVA UNIVIRTUS
http://univirtus­277877701.sa­east­1.elb.amazonaws.com/ava/web/#/ava/AvaliacaoUsuarioHistorico/59750/novo/1 7/8
Resposta:
algoritimo "relatorio" 
var 
x,qt,idade,fem_maior,fem_menor,marc_maior,masc_menor:inteiro 
sexo:caracter 
inicio 
escreval("Digite a quantidade total pessoas:") 
leia(qt) 
x<­0 
fem_menor<­0 
fem_maior<­0 
masc_maior<­0 
masc_menor<­0 
enquanto x < qt faca 
escreval("Digite a idade: ") 
leia(idade) 
escreval("Digite o sexo (M/F): ") 
leia(sexo) 
se (idade<18) e (sexo="F") entao 
fem_menor<­fem_menor+1 
fimse 
se (idade>=18) e (sexo="F") entao 
fem_maior<­fem_maior+1 
fimse 
se (idade<18) e (sexo="M") entao 
masc_menor<­masc_menor+1 
fimse 
   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.
16/04/2016 AVA UNIVIRTUS
http://univirtus­277877701.sa­east­1.elb.amazonaws.com/ava/web/#/ava/AvaliacaoUsuarioHistorico/59750/novo/18/8
se (idade>=18) e (sexo="M") entao 
masc_maior<­masc_maior+1 
fimse 
x<­x+1 
fimenquanto 
limpatela 
escreval("Total de meninas: ",fem_menor) 
escreval("Total de mulheres: ",fem_maior) 
escreval("Total de meninos: ",masc_menor) 
escreval("Total de homens: ",masc_maior) 
escreval("Total geral: ",qt) 
escreval("") 
escreval("Porcentagem de meninas: ",fem_menor*100/qt," %") 
escreval("Porcentagem de mulheres: ",fem_maior*100/qt," %") 
escreval("Porcentagem de meninos: ",masc_menor*100/qt," %") 
escreval("Porcentagem de homens: ",masc_maior*100/qt," %") 
fimalgoritimo