aula 7 e 8

1. Faça um programa que receba um número inteiro e verifique se é par ou ímpar.

algoritmo "parimpar"

var
x:inteiro
inicio
  escreval("digiteum numero")
   leia(x)
  se x mod 2=0 entao
   escreval("Número" , x , " é par")
  senao
   escreval("Numero" , x , " é impar ")
 fimse
fimalgoritmo

2. A nota final de um estudante é calculada a partir de três notas atribuídas, respectivamente , a um trabalho de laboratório, a uma avaliação semestral e a um exame final. A média das três notas mencionadas obedece aos pesos a seguir:

Nota	Peso
Trabalho de laboratório	2
Avaliação semestral	3
Exame final	5

Faça um programa que receba as três notas, calcule e mostre a média ponderada e o conceito que segue a tabela:

Média Ponderada	Conceito
[8,0 – 10,0]	A
[7,0 – 8,0[	B
[6,0 – 7,0[	C
[5,0 – 6,0[	D
[0,0 – 5,0[	E

algoritmo "Média e Conceito"

var

  n1,n2,n3,mediaponderada:real

inicio

  escreva("Digite a nota do aluno no trabalho de laboratório:")

  leia (n1)

  escreva("Digite a nota de avaliação semestral:")

  leia(n2)

  escreva("Digite a nota do aluno no exame final:")

  leia(n3)

  mediaponderada <-(n1*2+n2*3+n3*5)/(2+3+5)

     se (mediaponderada >= 8) e (mediaponderada <= 10) entao

       escreva("Conceito do aluno é A.")

     fimse

     se (mediaponderada >=7) e (mediaponderada < 8) entao

       escreva("Conceito do aluno é B. ")

     fimse

     se (mediaponderada >=6) e (mediaponderada <7) entao

       escreva("Conceito do alino é C.")

     fimse

     se (mediaponderada >=5) e (mediaponderada<6) entao

       escreva("Conceito dp aluno é D.")

     fimse

     se (mediaponderada >0) e (mediaponderada < 5) entao

        escreva("Conceito do aluno é E.")

     fimse

fimalgoritmo

3. Um funcionário de uma empresa recebe aumento salarial anualmente. Sabe-se que:

a) Esse funcionário foi contratado em 2007, com salário inicial de R$ 1.000,00.

b) Em 2008, ele recebeu aumento de 1,5% sobre seu salário inicial.

c) A partir de 2009 (inclusive), os aumentos salariais sempre corresponderam ao dobro do percentual do ano anterior.

Faça um programa que determine o salário atual desse funcionário. (o ano atual deve ser digitado pelo usuário

4. Faça um programa que receba três notas de um aluno, calcule e mostre a média aritmética e a mensagem constante na tabela a seguir. Aos alunos que ficaram para exame, calcule e mostra a nota que deverão tirar para serem aprovados, considerando que a média exigida é 6,0.

Média Aritmética	Mensagem
[0,0 – 3,0[	Reprovado
[3,0 – 7,0[	Exame
[7,0 – 10,0]	Aprovado

algoritmo "nota media"

var
      n1,n2,n3,media,notaexame,mediaexame,falta:real
inicio
  escreva("Digite a 1ºnota  do aluno:")
  leia(n1)
  escreva("Digite a 2ºnota  nota do aluno:")
  leia(n2)
  escreva("Digite a 3º nota do alno:")
  leia(n3)
  media<-(n1+n2+n3) / 3
   se (media >7) e (media<= 10) entao
    escreva("Aluno aprovado.")
   fimse
   se (media >3) e (media < 7) entao
    escreval(" Aluno com exame.")
falta <-(6*2)- media
        escreval("nescessita tirar:",falta)
    fimse
fimalgoritmo

5. Faça um programa que receba dois números e mostre o maior.

algoritmo "maior"

var

x,y:real

inicio

  escreval("Digite um número:")

  leia(x)

  escreval("Digite o outro numero:")

  leia(y)

   se x>y entao

   escreval(x)

   senao

   escreval(y)

   fimse

fimalgoritmo

 

6. Faça um programa que receba três números e mostre-os em ordem crescente. Suponha que o usuários digitará três números diferentes.

algoritmo "maior"
var
n1, n2, n3 :real
inicio
escreval ("Digite três números diferentes")
escreval ("Digite o primeiro número")
leia (n1)
escreval ("Digite o segundo número")
leia (n2)
escreval ("Digite o terceiro número")
leia (n3)
se (n1 < n2) e (n1 < n3) entao
   escreval (n1)
   se (n2 < n3 ) entao
      escreval (n2)
      escreval (n3)
   senao
      escreval (n3)
      escreval (n2)
   fimse
fimse
se (n2 < n1) e (n2 < n3) entao
   escreval (n2)
   se (n1 < n3 ) entao
      escreval (n1)
      escreval (n3)
   senao
      escreval (n3)
      escreval (n1)
   fimse
fimse
se (n3 < n1) e (n3 < n2) entao
   escreval (n3)
   se (n1 < n2 ) entao
      escreval (n1)
      escreval (n2)
   senao
      escreval (n2)
      escreval (n1)
   fimse
fimse
fimalgoritmo

7. Faça um programa que determine a data cronologicamente maior entre duas datas fornecidas pelo usuário. Cada data deve ser composta por três valores inteiros, em que o primeiro representa o dia, o segundo, o mês e o terceiro, o ano.

algoritmo "data"
var
dia, mes, ano, dia1, mes1, ano1:inteiro
inicio
escreval ("Escreva duas datas diferentes")
escreval ("Escreva a primeira data")
escreval ("Digite o dia")
leia (dia)
escreval ("Digite o mes")
leia (mes)
escreval ("Digite o ano")
leia (ano)
escreval ("Escreva a segunda data")
escreval ("Digite o dia")
leia (dia1)
escreval ("Digite o mes")
leia (mes1)
escreval ("Digite o ano")
leia (ano1)

se (ano > ano1) entao
   escreval (dia, mes, ano)
senao
   se (mes > mes1) entao
      escreval (dia, mes, ano)
   senao
      se (dia > dia1) entao
         escreval (dia, mes, ano)
      senao
         escreval (dia1, mes1, ano1 )
      fimse
   fimse
fimse
fimalgoritmo






Reflexão:
Exercícios muito dificeis,nescessitam de muita concentração, tenho dificuldade de achar a lógica correta , dificuldade de fazer apenas no papel, é dificil achar o erro depois que a logica está pronta.