LÓGICA DE PROGRAMAÇÃO E ALGORITMOS MATRIZ DISCURSIVA

Prévia do material em texto

11/20/2016 AVA UNIVIRTUS
1/8
Matriz Discursiva – UTA C FASE I – 17/10 ATE 04/11 [O aluno poderá utilizar o Software VisuALG]
 Nota: 100
Disciplina(s):
Lógica de Programação e Algoritimos
Data de início: 03/11/2016 19:27
Prazo máximo entrega: 03/11/2016 21:27
Data de entrega: 03/11/2016 20:38
Questão 1/5 - Lógica de Programação e Algoritimos
Faça um algoritmo que leia três valores e descubra qual o menor valor.
Nota: 20.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
     

 
11/20/2016 AVA UNIVIRTUS
2/8
Resposta:
algoritmo "Menorvalor" 
// Função : Verificar o menor de tres numeros em ordem 
// Seção de Declarações 
var 
n1, n2, n3: real
inicio 
// Seção de Comandos 
escreval ("Digite tres numeros quaisquer: ") 
leia (n1) 
leia (n2) 
leia (n3) 
se (n1=n2) e (n2=n3) então 
escreva ("Os tres numeros são iguais: ", n1, n2, n3 
senao 
se (n1=n2) ou (n1=n3) então 
escreva ("Há numeros iguais: ", n1, n2, n3) 
senao 
se (n1<n2) e (n1<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 
         se (n2<n3) e (n2<n1) e (n3<n1) entao
            escreva (" n2<n3<n1 ", n2,"<", n3,"<", n1)
         fimse
 
         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.
11/20/2016 AVA UNIVIRTUS
3/8
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
Questão 2/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

11/20/2016 AVA UNIVIRTUS
4/8
Resposta:
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 numero de elementos do vetor: ") 
leia(n) 
para i de 1 ate n faca 
escreval ("Digite um numero qualquer: ") 
leia(v[i]) 
fimpara 
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 
fimalgoritmo 
Questão 3/5 - Lógica de Programação e Algoritimos
Faça um algoritmo que escreva os quadrados de todos os números pares entre 1 e 20 (inclusive).
         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.
11/20/2016 AVA UNIVIRTUS
5/8
Nota: 20.0
Resposta:
algoritmo "quadrados­numeros­pares" 
// 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
Questão 4/5 - Lógica de Programação e Algoritimos
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
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.

algoritmo "producao­viavel"
// Seção de Declarações
var

11/20/2016 AVA UNIVIRTUS
6/8
Resposta:
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 valor 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
Questão 5/5 - Lógica de Programação e Algoritimos
  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.
11/20/2016 AVA UNIVIRTUS
7/8
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: 20.0
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]
     fimsefimpara
 
   escreval("Positivos:")
   para i de 1 ate j faca
      escreval(vp[i])
   fimpara

11/20/2016 AVA UNIVIRTUS
8/8
Resposta:
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 
se (v[i]>0 entao 
k<­k+1 
vp[k]<­v[i] 
senao 
j<­j+1 
vn[j]<­v[i] 
fimse 
escreval ("Numeros Positivos: ") 
para i de 1 ate j faca 
escreval (vp[i]) 
fimpara 
escreval ("Numeros Negativos: ") 
para i de 1 ate k faca 
escreval (vn[i]) 
fimpara 
fimalgoritmo
  
   escreval("Negativos:")
   para i de 1 ate k faca
      escreval(vn[i])
   fimpara
 fimalgoritmo
Conteúdo das Aulas 9 e 10.