nessa aula foi dada 8 questões de revisão para prova do dia 25/05
1)Faça um programa que recebe um número positivo e maior que zero, calcule e mostre:
1)Faça um programa que recebe um número positivo e maior que zero, calcule e mostre:
1)a) o número digitado ao quadrado;
1)b) o número digitado ao cubo;
1)c) a raiz quadrada do número digitado;
1)d) a raiz cúbica do número digitado.
algoritmo "semnome"
var
n, nq, cubo, rq, rc: real
inicio
leia(n)
se (n<=0) entao
escreval("Digite um nro maior que zero")
senao
nq <- n^2
escreval("O nro ao quadrado e ",nq)
cubo <- n^3
escreval("O nro ao cubo e ",cubo)
rq <- RaizQ(n)
escreval("A raiz quadrada e ",rq)
rc <- n^(1/3)
escreval("A raiz cubica e ", rc)
fimse
fimalgoritmo
algoritmo "semnome"
var
n, quad, cubo, raiz, raiz_cub: real;
inicio
escreval("Digite um numero")
leia(n);
se (n > 0) entao
quad <- n * n;
escreva (quad);
cubo <- n^3;
raiz <- n^(1/2);
raiz_cub <- n^(1/3);
escreva (cubo, raiz, raiz_cub);
senão
escreva("Digite um numero maior que zero");
fim-se
fimalgoritmo
2)Faça um programa para verificar se um inteiro positivo lido é par ou ímpar (mostre por escrito se é par ou ímpar). Se o número for ímpar, multiplique por 2 e mostre o resultado, caso contrário multiplique por ½ e mostre o resultado. (OBS: Par: x mod 2 = 0)
algoritmo "parimpar"
var
result:real
n:inteiro
inicio
leia(n)
se (n mod 2 = 0) entao
escreval("o numero lido é par")
result <- n * 1/2
senao
escreval("o numero lido é impar")
result <- n * 2
fimse
escreval(result)
fimalgoritmo
3)Faça um programa que receba o custo total de um espetáculo teatral e o preço do convite desse espetáculo. Esse programa deverá calcular e mostrar a quantidade de convites que devem ser vendidos para que pelo menos o custo do espetáculo seja alcançado.
algoritmo "teatro"
var
total, ingresso, qtd:real
inicio
escreval("Digite o custo total do espetaculo")
leia(total)
escreval("Digite o custo do ingresso")
leia(ingresso)
qtd <- total/ingresso
escreval("Voce deve vender no minimo ",qtd, " ingressos")
fimalgoritmo
4)Faça um programa que receba três números e mostre-os em ordem decrescente.
algoritmo "decrescente"
var
A, B, C : inteiro
inicio
escreval("Digite 3 numeros para ordenar descrescente")
leia (A, B, C)
se (A > B) e (A > C) entao
se (B > C) entao
escreval (A, B, C)
senao
escreval (A, C, B)
fimse
senao
se (B > A) e (B > C) entao
se( A > C) entao
escreval (B, A, C)
senao
escreval (B, C, A)
fimse
senao
se (C > A) e (C > B) entao
se ( A > B) entao
escreval (C, A, B)
senao
escreval (C, B, A)
fimse
fimse
fimse
fimse
fimalgoritmo
5)Faça um programa que receba a hora do início de um jogo e a hora final (cada hora é composta por duas variáveis inteiras: hora e minuto). Calcule e mostre a duração do jogo (horas e minutos), sabendo-se que o tempo máximo de duração do jogo é de 24 horas e que ele pode iniciar-se em um dia e terminar no dia seguinte.
6)Faça um programa que receba cem números, calcule e mostre a soma dos números pares e a média dos números primos.
7)Faça um programa que receba a idade e o peso de 75 pessoas, e que calcule e mostre as médias dos pesos das pessoas da mesma faixa etária. As faixas etárias são: de 1 a 10 anos, de 11 a 20 anões de 21 a 30 anos e de 31 anos para cima.
algoritmo "peso_idade"
var
x,idade,pesso:inteiro
contador1,contador2,contador3,contador4,pesso1,pesso2,pesso3,pesso4,media1,media2,media3,media4:real
inicio
contador1<-0
contador2<-0
contador3<-0
contador4<-0
pesso1<-0
pesso2<-0
pesso3<-0
pesso4<-0
para x de 1 ate 75 faca
escreval("Digite a idade e o pesso!")
escreva("Digite a idade: ")
leia(idade)
escreva("Digite o Pesso: ")
leia(pesso)
se(idade>=1) e (idade<=10) entao
contador1<-contador1+1
pesso1<-pesso+pesso1
senao
se(idade>=11) e (idade<=20) entao
contador2<-contador2+1
pesso2<-pesso+pesso2
senao
se(idade>=21) e (idade<=30) entao
contador3<-contador3+1
pesso3<-pesso+pesso3
senao
se(idade>=31) entao
contador4<-contador4+1
pesso4<-pesso+pesso4
senao
fimse
fimse
fimse
fimse
fimpara
media1<-pesso1/contador1
media2<-pesso2/contador2
media3<-pesso3/contador3
media4<-pesso4/contador4
escreval("A média de pesso da idade 1 até 10 anos é",media1,".")
escreval("A média de pesso da idade 11 até 20 anos é",media2,".")
escreval("A média de pesso da idade 21 até 30 anos é",media3,".")
escreval("A média de pesso da idade 31 ou mais é",media4,".")
fimalgoritmo
var
x,idade,pesso:inteiro
contador1,contador2,contador3,contador4,pesso1,pesso2,pesso3,pesso4,media1,media2,media3,media4:real
inicio
contador1<-0
contador2<-0
contador3<-0
contador4<-0
pesso1<-0
pesso2<-0
pesso3<-0
pesso4<-0
para x de 1 ate 75 faca
escreval("Digite a idade e o pesso!")
escreva("Digite a idade: ")
leia(idade)
escreva("Digite o Pesso: ")
leia(pesso)
se(idade>=1) e (idade<=10) entao
contador1<-contador1+1
pesso1<-pesso+pesso1
senao
se(idade>=11) e (idade<=20) entao
contador2<-contador2+1
pesso2<-pesso+pesso2
senao
se(idade>=21) e (idade<=30) entao
contador3<-contador3+1
pesso3<-pesso+pesso3
senao
se(idade>=31) entao
contador4<-contador4+1
pesso4<-pesso+pesso4
senao
fimse
fimse
fimse
fimse
fimpara
media1<-pesso1/contador1
media2<-pesso2/contador2
media3<-pesso3/contador3
media4<-pesso4/contador4
escreval("A média de pesso da idade 1 até 10 anos é",media1,".")
escreval("A média de pesso da idade 11 até 20 anos é",media2,".")
escreval("A média de pesso da idade 21 até 30 anos é",media3,".")
escreval("A média de pesso da idade 31 ou mais é",media4,".")
fimalgoritmo
8)Cada espectador de um cinema respondeu a um questionário no qual constava sua idade e sua opinião em relação ao filme: ótimo – 3, bom – 2, regular – 1. Faça um programa que receba a idade e a opinião de 75 espectadores, calcule e mostre:
− a média das idades das pessoas que responderam ótimo;
− a quantidade de pessoas que responderam regular;
− a percentagem de pessoas que responderam bom, entre todos os espectadores analisados.
algoritmo "questionario"
var
x,idade,opcao:inteiro
contador1,contador2,contador3,idade_o,media_o,media_b:real
inicio
para x de 1 ate 75 faca
escreval("Ola, digite sua idade e opinição do filme.")
escreva("Digite sua idade: ")
leia(idade)
limpatela
escreval("Para Ótimo digite 3, para Bom digite 2 e para Regular digite 1.")
repita
escreva("Digite a opcao desejada: ")
leia(opcao)
se (opcao<>1) ou (opcao<>2) ou (opcao<>3) entao
escreva("Digitou opção errada, redigite sua opção!")
fimse
ate(opcao=1)ou(opcao=2)ou(opcao=3)
limpatela
se (opcao = 1) entao
contador1<-contador1+1
fimse
se (opcao = 3) entao
contador3<-contador3+1
idade_o<-idade+idade_o
fimse
se (opcao = 2) entao
contador2<-contador2+1
fimse
fimpara
media_o<-idade_o/contador3
escreval("A média das pessoas que acharam ótimo foi de",media_o,".")
escreval(contador1," pessoas responderam Regular.")
media_b<-75/contador2
escreval(media_b,"% das pessoas responderam Bom.")
fimalgoritmo
ultimo dia para rever erros, amanha a prova e ja to desanimado antes de fazela.
não consegui resolver a 5º ea 6º quetão e não foi apenas eu foi toda a turma no geral que não conseguiu bom se cair uma questão assm eu to morto nessa prova
var
x,idade,opcao:inteiro
contador1,contador2,contador3,idade_o,media_o,media_b:real
inicio
para x de 1 ate 75 faca
escreval("Ola, digite sua idade e opinição do filme.")
escreva("Digite sua idade: ")
leia(idade)
limpatela
escreval("Para Ótimo digite 3, para Bom digite 2 e para Regular digite 1.")
repita
escreva("Digite a opcao desejada: ")
leia(opcao)
se (opcao<>1) ou (opcao<>2) ou (opcao<>3) entao
escreva("Digitou opção errada, redigite sua opção!")
fimse
ate(opcao=1)ou(opcao=2)ou(opcao=3)
limpatela
se (opcao = 1) entao
contador1<-contador1+1
fimse
se (opcao = 3) entao
contador3<-contador3+1
idade_o<-idade+idade_o
fimse
se (opcao = 2) entao
contador2<-contador2+1
fimse
fimpara
media_o<-idade_o/contador3
escreval("A média das pessoas que acharam ótimo foi de",media_o,".")
escreval(contador1," pessoas responderam Regular.")
media_b<-75/contador2
escreval(media_b,"% das pessoas responderam Bom.")
fimalgoritmo
ultimo dia para rever erros, amanha a prova e ja to desanimado antes de fazela.
não consegui resolver a 5º ea 6º quetão e não foi apenas eu foi toda a turma no geral que não conseguiu bom se cair uma questão assm eu to morto nessa prova
Nenhum comentário:
Postar um comentário