Prova Discrusiva Lógica de Programação e Algoritmos

Prévia do material em texto

Questão 1/5 
Faça um algoritmo que leia uma matriz mXn e depois mostre os dados. 
algoritmo "matriz01" 
Nota: 6.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 
 
Conteúdo das Aulas 9 e 10. 
Resposta:leia(m,n) 
para m de 1 ate n 
para n de 1 ate m 
escreval ("digite um valor para linha ",m,"coluna.",n,":") 
matriz(m,n)<-m+1 
fimpara 
 
 
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: 0.0 
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. 
Resposta:10 32 F° 
 
20 50 f° 
30 68fº 
40 86fº 
 
50 104fº 
60 122f° 
70 158fº 
80 176Fº 
90 194f° 
100 212f° 
 
 
Questão 3/5 
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: 0.0 
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 
 
Referência: Conteúdo da Aula 8. 
Resposta:cel,far:real 
inicio: 
escreval (''tabela de conversao de temperatura") 
escreva("digite a temperatura em graus celsius") 
leia (cel) 
far<-(9*cel 212)/5 
escreval("nova temperatura eh",far,"f°") 
fimalgoritmo 
 
 
 
 
Questão 4/5 
Escreva um algoritmo para calcular a área de num quadrado. 
Nota: 16.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. 
Resposta:var 
largura, comprimento,area:inteiro 
escreval("digite a lagura") 
leia (a largura) 
escreval("digite o comprimento") 
leia (o comprimento) 
area=lagura*comprimento 
escreval("a area do quatrilatero coresponde ah " +a) 
fimalgotmo 
 
 
 
 
Questão 5/5 
Faça um algoritmo que leia n números. Exiba a soma dos quadrados de 
todos os números. 
Nota: 6.0 
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. 
Resposta:var: 
l,c,a real 
escreval("digite a lagura do quadrado") 
leia(l) 
escreval("digite o comprimento do quadrado") 
leia(c)