Atividade Pratica, Logica de Programação e Algoritmos com gabarito

Prévia do material em texto

1/14
Questão 1/10 - Lógica de Programação e Algoritmos
Faça um algoritmo que escreva os quadrados de todos os números pares entre 1 e 20 (inclusive).
Nota: 10.0
Resposta:
Algoritmo "Quadrados" 
 
Var 
i,n,quadrado: inteiro 
 
Inicio 
//Seção de Comandos 
escreval ("***Os quadrados dos numeros pares de 1 
ate 20 são:***") 
escreva ("") 
 
i<-1 
para i de 1 ate 20 faca 
 se ( i mod 2=0) entao 
 quadrado<-i*i 
 escreval ("Numero ", i," e par. O seu quadrado e : 
",quadrado) 
 fimse 
 i<- i + 1 
fimpara 
 
Fimalgoritmo 
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.
 
2/14
Questão 2/10 - Lógica de Programação e Algoritmos
Escreva um algoritmo para calcular a área de um quadrado.
Nota: 10.0
Resposta:
Algoritmo "quadrado" 
 
Var 
 lado,area: real 
 
Inicio 
 escreval("***Entrada de Dados***") 
 escreval("") 
 escreva("Digite o valor para um lado: ") 
 leia (lado) 
 escreval("") 
 area<-lado*lado 
 escreval("***Saida de Dados***") 
 escreval("") 
 escreval("A area do quadrado e: ",area) 
 
fimalgoritmo
Questão 3/10 - Lógica de Programação e Algoritmos
Faça um algoritmo que receba um vetor com valores positivos e negativos. Após a entrada dos 
dados o algoritmo deverá decompor este em outros dois vetores. Um vetor somente de números 
positivos e outro vetor só de números negativos. Ao término, mostrar os dois novos vetores.
Nota: 10.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.
 
3/14
algoritmo "vetores"
var
 
 i,j,k,n : inteiro
 v: vetor [1..50] de real
 vp: vetor [1..50] de real
 vn: 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
 
 limpatela
 
 k<-0
 j<-0
 para i de 1 ate n faca
 se (v[i]>0) entao
 k<-k+1
 vp[k]<-v[i]
 senao
 j<-j+1
 vn[j]<-v[i]
 fimse
 
 fimpara
 
 escreval("Positivos:")
 para i de 1 ate j faca
 escreval(vp[i])
 fimpara
 
 escreval("Negativos:")
4/14
Resposta:
Algoritmo "Vetores" 
 
Var 
i,j,m,n: inteiro 
v:vetor [1..20] de real 
vpos: vetor [1..20] de real 
vneg: vetor [1..20] de real 
 
Inicio 
escreval ("***Entrada de Dados***") 
escreval ("") 
escreval ("Digite o numero de elementos para o vetor") 
leia (n) 
para i de 1 ate n faca 
 escreva ("Digite um numero qualquer: ") 
 leia (v [ i ] ) 
fimpara 
 
limpatela 
 
j<-0 
m<-0 
 
para i de 1 ate n faca 
 se (v [ i ] >0) entao 
 m<-m+1 
 vpos [ m ]<-v [ i ] 
 senao 
 j<-j+1 
 vneg [ j ]<-v [ i ] 
 fimse 
fimpara 
 
escreval ("*** Saida de Dados***") 
escreval ("") 
escreval ("Positivos: ") 
para i de 1 ate j faca 
 escreval (vpos [ i ] ) 
fimpara 
 
escreval ("Negativos: ") 
para i de 1 ate j faca 
 escreval (vneg [ i ] ) 
fimpara 
 para i de 1 ate k faca
 escreval(vn[i])
 fimpara
 fimalgoritmo
 
Conteúdo das Aulas 9 e 10.
 
5/14
 
fimalgoritmo 
Questão 4/10 - Lógica de Programação e Algoritmos
Faça um algoritmo que leia três valores e descubra qual o menor valor.
Nota: 10.0
algoritmo "Menor3"
// Função : Verificar o menor de tres numeros e
ordem decrescente)
// Seção de Declarações
var
 n1,n2,n3: real
 
inicio
// Seção de Comandos
 escreval("Digite tres números quaisquer: ")
 leia(n1)
 leia(n2)
 leia(n3)
 
 se (n1=n2) e (n2=n3) entao
 escreva ("Os tres numeros sao iguais :", n1, n2,
n3)
 senao
 se (n1=n2) ou (n2=n3) ou (n1=n3) entao
 escreva ("Ha numeros iguais :", n1, n2 ,n3)
 senao
 
 se (n1<n2) e (n1<n3) e (n2<n3) entao
 escreva (" n1<n2<n3 ", n1,"<", n2,"<", n3)
 fimse
 
 se (n1<n3) e (n1<n2) e (n3<n2) entao
 escreva (" n1<n3<n2 ", n1,"<", n3,"<", n2)
 fimse
 
 se (n2<n3) e (n2<n1) e (n3<n1) entao
 escreva (" n2<n3<n1 ", n2,"<", n3,"<", n1)
 fimse
 
6/14
Resposta:
Algoritmos " Menor valor " 
 
Var 
i : inteiro 
menor, valor : real 
 
Inicio 
//Seção de Comandos 
escreval ("***Entrada de dados***") 
escreval("") 
menor<-999999999 
para i de 1 ate 3 faca 
 escreva ("Digite um numero : ") 
 leia (valor) 
 se (valor< menor) entao 
 menor <- valor 
 fimse 
 fimpara 
 
escreval (" O menor valor é: ", menor) 
 
fimalgoritmo
Questão 5/10 - Lógica de Programação e Algoritmos
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 
 se (n2<n1) e (n2<n3) e (n1<n3) entao
 escreva (" n2<n1<n3 ", n2,"<", n1,"<", n3)
 fimse
 
 se (n3<n1) e (n3<n2) e (n1<n2) entao
 escreva (" n3<n1<n2 ", n3,"<", n1,"<", n2)
 fimse
 
 se (n3<n2) e (n3<n1) e (n2<n1) entao
 escreva (" n3<n2<n1 ", n3,"<", n2,"<", n1)
 fimse
 fimse
 fimse
 
fimalgoritmo
 
Conteúdo da Aula 5.
 
7/14
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: 10.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
 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
8/14
Resposta:
Algoritmo "Vetor" 
 
Var 
 
i, n, posicao: inteiro 
valor: real 
v: vetor [1..20] de real 
 
Inicio 
 
escreval ("Digite o numero de variaveis do vetor: ") 
leia (n) 
 
para i de 1 ate n faca 
 escreval ("Digite um numero qualquer : ") 
 leia (v [ i ] ) 
fimpara 
 
escreval ("Digite um valor para inserir no vetor: ") 
leia (valor) 
escreval ("Digite a posicao no vetor : ") 
leia (posicao) 
 
para i de n ate 2 passo -1 faca 
 se ( i >=posicao) entao 
 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 
Questão 6/10 - Lógica de Programação e Algoritmos
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 
 
fimalgoritmo
 
Conteúdo das Aulas 9 e 10.
 
9/14
de temperaturas necessárias.
 
A fórmula para conversão é: 
Nota: 10.0
Resposta:
Algoritmo "Conversão de Temperaturas" 
 
Var 
celsius, farh, celsius_ini : real 
algoritmo "conversaoCF"
// Seçãode 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.
 
10/14
qt_temp, i , incremento : inteiro 
 
Inicio 
 
escreval ("***Entrada de Dados***") 
escreval ("") 
escreval ("Informe a temperatura inicial em Celsius : ") 
leia (celsius_ini) 
escreval ("Informe a quantidade de temperaturas da 
tabela : ") 
leia (qt_temp) 
escreval ("Informe o incremento de temperatura : ") 
leia (incremento) 
 
escreval ("") 
escreval ("***Saida de Dados***") 
escreval ("") 
 
 celsius<-celsius_ini 
para i de 1 ate qt_temp faca 
 farh<-9/5*celsius+32 
 celsius<- celsius + incremento 
 escreva ( i, "-") 
 escreval ("Celsius :",celsius) 
 escreval ("Farenheit :",farh) 
 escreval ("") 
fimpara 
 
fimalgoritmo
Questão 7/10 - Lógica de Programação e Algoritmos
Para manipulação de dados dentro de nossos algoritmos utilizamos quais elementos? Explique 
cada um.
Nota: 10.0
Resposta:
 Variáveis, que são alteradas constantemente no 
decorrer do tempo de execução dos algoritmos e 
constantes que não sofrem variação no decorrer do 
tempo de execução do algoritmo. 
Variáveis e Constantes. Variáveis que são alteradas
constantemente no decorrer do tempo de execução
dos algoritmos e constantes, que não sofrem
variação no decorrer do tempo de execução do
algoritmo.
 
Conteúdo da Aula 3, Slide 6.
 
11/14
Questão 8/10 - Lógica de Programação e Algoritmos
Faça um algoritmo que leia uma matriz mXn e depois mostre os dados.
 
algoritmo "matriz01"
Nota: 10.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
12/14
Algoritmo "Matriz01" 
 
Var 
 
matriz : vetor [1..20,1..20] de inteiro 
i, j, m ,n : inteiro 
 
Inicio 
escreval ("***Entrada de Dados***") 
escreval ("") 
escreva ("Digite o numero de linhas para a matriz : ") 
leia (m) 
escreva ("Digite o numero de colunas : ") 
leia (n) 
escreval ("Digite a matriz") 
para i de 1 ate m faca 
 para j de 1 ate n faca 
 escreval ("Digite o valor" ,i,j, " : ") 
 leia (matriz[ i,j ]) 
 fimpara 
 fimpara 
 
limpatela 
 
escreval ("***Saida de Dados***") 
escreval ("") 
escreval ("Matriz Digitada : ") 
para i de 1 ate m faca 
 para j de 1 ate n faca 
 escreval (matriz [ i,j ]) 
 fimpara 
 escreval ("") 
 fimpara 
 
Fimalgoritmo
Questão 9/10 - Lógica de Programação e Algoritmos
Cada estrutura a seguir tem uma finalidade específica dentro de algoritmos e pseudocódigos. 
 1 ) PARA
 2 ) SE-ENTAO
 3 ) ENQUANTO
 4 ) FUNÇÕES
Explique com breves palavras o que é e para que serve cada um dos itens acima citados.
Nota: 10.0
1 ) PARA
 O que é? Estrutura de repetição (ou de iteração ou loop o
Para que serve? Serve para repetir uma parte do código 
13/14
Questão 10/10 - Lógica de Programação e Algoritmos
Faça um algoritmo que leia n números. Exiba a soma dos quadrados de todos os números.
Nota: 10.0
Resposta:
1- Para- é uma estrutura de repetição,loop ou laço e serv
for necessário. 
 
2- Se-Então- é uma estrutura condicional e serve para d
 
3- Enquanto - é também uma estrutura de repetição e ser
vezes for necessário. 
 
4- Funções - é uma estrutura de modularização é um sub
para dividir as tarefas em partes.
 
2 ) SE-ENTAO
 O que é? Estrutura condicional. 
 Para que serve? Serve para decidir qual parte do código 
 
3 ) ENQUANTO
 O que é? Estrutura de repetição (ou de iteração ou loop o
Para que serve? Serve para repetir uma parte do código 
 
 4 ) FUNÇÕES
 O que é? Estrutura de modularização do código.
 Para que serve? Serve para dividir as tarefas entre os pr
(qualquer uma das respostas do aluno pode ser consider
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("")
14/14
Resposta:
Algoritmo "Soma_quadrados" 
 
Var 
 n, i : inteiro 
 soma, valor :real 
 
Inicio 
escreval ("Soma dos Quadrados") 
escreval ("") 
escreval ("Digite a quantidade de numeros : ") 
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 e : ", soma) 
 
Fimalgoritmo
 
soma<-0
para i de 1 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.