algoritmo "Notas de provas"
var
p1,p2,p3,media:real
inicio
escreval ("Digite o valor da primeira prova")
leia (p1)
escreval ("Digite o valor da segunda prova")
leia (p2)
escreval ("Digite o valor da terceira prova")
leia (p3)
se (p1<=10)e(p2<=10)e(p3<=10) entao
media <- (p1+p2+p3 div 3)
escreval ("A média aritmética eh igual a ",media)
senao
escreval ("O valor deve ser ne um intervalo de 0 a 10")
fimse
fimalgoritmo
segunda-feira, 27 de setembro de 2010
Profº Piva - Algoritmos - Exercícios Capítulo 3.13) Escreva um algoritmo que leia a altura (em metros), o peso (em quilogramas) e o sexo (“MASCULINO” ou “FEMININO”) e calcule seu peso ideal, dado por peso ideal do homem = (72,7 x altura) – 58 --> (3.3) ou peso ideal da mulher = (62,1 x altura) – 44,77 --> (3.4) O algoritmo deve, também, informar se a pessoa está abaixo ou acima de seu peso ideal e m quantos quilos.
algoritmo "Calculo Peso Ideal"
var
altura,peso,pesoideal,amais,amenos:real
sexo:literal
inicio
escreval (" Calcule seu peso ideal, dado por peso ideal do homem =(72,7 x altura) – 58")
escreval (" peso ideal da mulher = (62,1 x altura) – 44,77")
escreval ("Digite sua altura")
leia (altura)
escreval ("Digite seu peso")
leia (peso)
escreval ("Digite seu sexo")
leia (sexo)
se ((sexo="FEMININO") ou (sexo="F")) entao
pesoideal <- ((62.1*altura)- 44.77)
senao
pesoideal<- ((72.7*altura)-58)
fimse
se(peso>pesoideal) entao
amais<-peso-pesoideal
escreval ("Seu peso ideal eh igual a", pesoideal," e você esta acima do peso ideal, em ", amais:5:2, "kilos")
senao
se(pesoideal>peso)entao
amenos<-pesoideal-peso
escreval ("Seu peso ideal eh igual a", pesoideal," e você esta abaixo do peso ideal, em ", amenos:5:2 , "kilos")
senao
escreval("Você está no seu peso ideal,,,, parabéns!!!!!!!!!!!!")
fimse
fimse
fimalgoritmo
var
altura,peso,pesoideal,amais,amenos:real
sexo:literal
inicio
escreval (" Calcule seu peso ideal, dado por peso ideal do homem =(72,7 x altura) – 58")
escreval (" peso ideal da mulher = (62,1 x altura) – 44,77")
escreval ("Digite sua altura")
leia (altura)
escreval ("Digite seu peso")
leia (peso)
escreval ("Digite seu sexo")
leia (sexo)
se ((sexo="FEMININO") ou (sexo="F")) entao
pesoideal <- ((62.1*altura)- 44.77)
senao
pesoideal<- ((72.7*altura)-58)
fimse
se(peso>pesoideal) entao
amais<-peso-pesoideal
escreval ("Seu peso ideal eh igual a", pesoideal," e você esta acima do peso ideal, em ", amais:5:2, "kilos")
senao
se(pesoideal>peso)entao
amenos<-pesoideal-peso
escreval ("Seu peso ideal eh igual a", pesoideal," e você esta abaixo do peso ideal, em ", amenos:5:2 , "kilos")
senao
escreval("Você está no seu peso ideal,,,, parabéns!!!!!!!!!!!!")
fimse
fimse
fimalgoritmo
domingo, 26 de setembro de 2010
Profº Piva - Algoritmos - Exercícios Capítulo 2.21) A comissão de formatura de um curso está organizando a festa de formatura de sua turma e levantou as seguintes informações: 1. custo do salão (capacidade de 800 pessoas com mesas de 4 pessoas) R$ 2000.00; 2. custo da sonorização: R$ 500,00 3. custo da decoração: R$ 800,00 Além desses custos, que serão rateados igualmente entre os formandos, há custos cuja divisão é proporcional ao número de convidados do formando. São eles: 1. segurança: necessário um segurança para cada 80 pessoas da festa; 2. garçom: um garçom consegue atender 48 pessoas (ou 12 mesas de 4 pessoas); e 3. bebida. Escreva um algoritmo que leia o nome de cada um dos cinco formandos com seus respectivos números de convidados. Ele também deve ler os custos de um segurança, de um garçom e da bebida. O algoritmo deve calcular e escrever, para cada formando o número de mesas desitnadas para seus convidados e o custo da festa para eles. As mesas poderão ser compartilhadas entre convidados de diferentes formandos.
algoritmo "Cálculo para fazer uma festa de formatura."
var
var
f1,f2,f3,f4,f5:literal
ncf1,ncf2,ncf3,ncf4,ncf5:inteiro
pg,ps,pb,tc,tg,ts,tm,custotal:inteiro
mf1,mf2,mf3,mf4,mf5,ppc:real
inicio
escreval("Cálculo para fazer uma festa de formatura.")
escreva(" Digite o nome do primeiro formando ")
leia(f1)
escreva(" Digite o número de convidados do primeiro formando ")
leia(ncf1)
escreva(" Digite o nome do segundo formando ")
leia(f2)
escreva(" Digite o número de convidados do segundo formando ")
leia(ncf2)
escreva(" Digite o nome do terceiro formando ")
leia(f3)
escreva(" Digite o número de convidados do terceiro formando ")
leia(ncf3)
escreva(" Digite o nome do quarto formando ")
leia(f4)
escreva(" Digite o número de convidados do quarto formando ")
leia(ncf4)
escreva(" Digite o nome do quinto formando ")
leia(f5)
escreva(" Digite o número de convidados do quinto formando ")
leia(ncf5)
escreva(" Digite o preço de um garçom ")
leia(pg)
escreva(" Digite o preço de um segurança ")
leia(ps)
escreva(" Digite o preço das bebidas ")
leia(pb)
tc <- (ncf1+ncf2+ncf3+ncf4+ncf5)
se tc>800 entao
escreva("O salão não suporta o número de pessoas.")
fimalgoritmo
senao
tg <- (tc div 48)+1
ts <- (tc div 80)+1
tm <- ((tc+5) div 4)
mf1 <- ncf1 / 4
mf2 <- ncf2 / 4
mf3 <- ncf3 / 4
mf4 <- ncf4 / 4
mf5 <- ncf5 / 4
custotal < pb+((tg*pg)+(ts*ps))
ppc <- custotal/tc
fimse
escreval("Para o(s) convidado(s) de ",f1," existe(m) ",mf1," mesa(s).")
escreval("Cada convidado de ",f1," pagará R$",ppc:5:2,".")
escreval("Para o(s) convidado(s) de ",f2," existe(m) ",mf2," mesa(s).")
escreval("Cada convidado de ",f2," pagará R$",ppc:5:2,".")
escreval("Para o(s) convidado(s) de ",f3," existe(m) ",mf3," mesa(s).")
escreval("Cada convidado de ",f3," pagará R$",ppc:5:2,".")
escreval("Para o(s) convidado(s) de ",f4," existe(m) ",mf4," mesa(s).")
escreval("Cada convidado de ",f4," pagará R$",ppc:5:2,".")
escreval("Para o(s) convidado(s) de ",f5," existe(m) ",mf5," mesa(s).")
escreval("Cada convidado de ",f5," pagará R$",ppc:5:2,".")
escreval(" *** F I M *** ")
Fimalgoritmo
ncf1,ncf2,ncf3,ncf4,ncf5:inteiro
pg,ps,pb,tc,tg,ts,tm,custotal:inteiro
mf1,mf2,mf3,mf4,mf5,ppc:real
inicio
escreval("Cálculo para fazer uma festa de formatura.")
escreva(" Digite o nome do primeiro formando ")
leia(f1)
escreva(" Digite o número de convidados do primeiro formando ")
leia(ncf1)
escreva(" Digite o nome do segundo formando ")
leia(f2)
escreva(" Digite o número de convidados do segundo formando ")
leia(ncf2)
escreva(" Digite o nome do terceiro formando ")
leia(f3)
escreva(" Digite o número de convidados do terceiro formando ")
leia(ncf3)
escreva(" Digite o nome do quarto formando ")
leia(f4)
escreva(" Digite o número de convidados do quarto formando ")
leia(ncf4)
escreva(" Digite o nome do quinto formando ")
leia(f5)
escreva(" Digite o número de convidados do quinto formando ")
leia(ncf5)
escreva(" Digite o preço de um garçom ")
leia(pg)
escreva(" Digite o preço de um segurança ")
leia(ps)
escreva(" Digite o preço das bebidas ")
leia(pb)
tc <- (ncf1+ncf2+ncf3+ncf4+ncf5)
se tc>800 entao
escreva("O salão não suporta o número de pessoas.")
fimalgoritmo
senao
tg <- (tc div 48)+1
ts <- (tc div 80)+1
tm <- ((tc+5) div 4)
mf1 <- ncf1 / 4
mf2 <- ncf2 / 4
mf3 <- ncf3 / 4
mf4 <- ncf4 / 4
mf5 <- ncf5 / 4
custotal < pb+((tg*pg)+(ts*ps))
ppc <- custotal/tc
fimse
escreval("Para o(s) convidado(s) de ",f1," existe(m) ",mf1," mesa(s).")
escreval("Cada convidado de ",f1," pagará R$",ppc:5:2,".")
escreval("Para o(s) convidado(s) de ",f2," existe(m) ",mf2," mesa(s).")
escreval("Cada convidado de ",f2," pagará R$",ppc:5:2,".")
escreval("Para o(s) convidado(s) de ",f3," existe(m) ",mf3," mesa(s).")
escreval("Cada convidado de ",f3," pagará R$",ppc:5:2,".")
escreval("Para o(s) convidado(s) de ",f4," existe(m) ",mf4," mesa(s).")
escreval("Cada convidado de ",f4," pagará R$",ppc:5:2,".")
escreval("Para o(s) convidado(s) de ",f5," existe(m) ",mf5," mesa(s).")
escreval("Cada convidado de ",f5," pagará R$",ppc:5:2,".")
escreval(" *** F I M *** ")
Fimalgoritmo
Profº Piva - Algoritmos - Exercícios Capítulo 2.17) Faça um algoritmo que leia o dia do mês ( valor de 1 a 31), e o dia da semana correspondente (1 a 7). O algoritmo deve calcular e escrever o dia da semana (1 a 7) correspondente ao primeiro dia do mês.
algoritmo "Cálculo do primeiro dia de mês."
var
semana:literal
dm,ds:inteiro
inicio
escreval("Saiba qual é o primeiro dia do mês.")
escreva(" Digite o dia do mês de1 a 31 -> ")
leia(dm)
escreva(" Digite o dia da semana de1 a 7 -> ")
leia(ds)
se (dm>31) e (dm<1) e (ds>7) e (ds<1) entao
escreva("Número inválido")
fimalgoritmo
senao
se dm>1 entao
dm <- dm-1
ds <- (ds-2)
se (ds=0) entao
ds <- (7)
fimse
fimse
fimse
se ds=1 entao
semana <- "é um Domingo."
senao
se ds=2 entao
semana <- "é uma Segunda-feira."
senao
se ds=3 entao
semana <- "é uma Terça-feira."
senao
se ds=4 entao
semana <- "é uma Quarta-feira."
senao
se ds=5 entao
semana <- "é uma Quinta-feira."
senao
se ds=6 entao
semana <- "é uma Sexta-feira."
senao
se ds=7 entao
semana <- "é Sabado."
fimse
fimse
fimse
fimse
fimse
fimse
fimse
escreval(" O dia da semana ",semana)
Fimalgoritmo
var
semana:literal
dm,ds:inteiro
inicio
escreval("Saiba qual é o primeiro dia do mês.")
escreva(" Digite o dia do mês de
leia(dm)
escreva(" Digite o dia da semana de
leia(ds)
se (dm>31) e (dm<1) e (ds>7) e (ds<1) entao
escreva("Número inválido")
fimalgoritmo
senao
se dm>1 entao
dm <- dm-1
ds <- (ds-2)
se (ds=0) entao
ds <- (7)
fimse
fimse
fimse
se ds=1 entao
semana <- "é um Domingo."
senao
se ds=2 entao
semana <- "é uma Segunda-feira."
senao
se ds=3 entao
semana <- "é uma Terça-feira."
senao
se ds=4 entao
semana <- "é uma Quarta-feira."
senao
se ds=5 entao
semana <- "é uma Quinta-feira."
senao
se ds=6 entao
semana <- "é uma Sexta-feira."
senao
se ds=7 entao
semana <- "é Sabado."
fimse
fimse
fimse
fimse
fimse
fimse
fimse
escreval(" O dia da semana ",semana)
Fimalgoritmo
Profº Piva - Algoritmos - Exercícios Capítulo 2.20) Escreva um algoritmo que leia o nome, o valor da hora e o número de horas trabalhadas por um empregado. O algoritmo deve escrever o nome e o salário liquido do empregado calculado conforme as seguintes regras: 1. o salário bruto mensal é o produto das horas trabalhadas pelo valor das horas. 2. sobre o salário bruto mensal é aplicado um desconto de 9% referente ao INSS e 8% de FGTS; e 3. o salário liquido é o salário bruto mensal menos os encargos.
algoritmo "Cálculo do salário"
var
var
nome:literal
vh,nh,sb,sl:real
inicio
escreval("Cálculo do salário de um empregado.")
inicio
escreval("Cálculo do salário de um empregado.")
escreval(" Digite o nome do empregado -> ")
leia(nome)
escreval(" Digite quanto ele recebe por hora -> ")
leia(vh)
escreval(" Digite a quantidade de horas trabalhadas -> ")
leia(nome)
escreval(" Digite quanto ele recebe por hora -> ")
leia(vh)
escreval(" Digite a quantidade de horas trabalhadas -> ")
leia(nh)
sb <- (vh*nh)
sl <- sb-(sb*0.08)-(sb*0.09)
escreval(" O salário do empregado ",nome," é de R$",sl:5:2," .")
escreval(" *** F I M ***")
Fimalgoritmo
sb <- (vh*nh)
sl <- sb-(sb*0.08)-(sb*0.09)
escreval(" O salário do empregado ",nome," é de R$",sl:5:2," .")
escreval(" *** F I M ***")
Fimalgoritmo
Profº Piva - Algoritmos - Exercícios Capítulo 2.19) O custo final de um carro é a soma do custo de fábrica com o percentual de revenda mais impostos, ambos aplicados ao custo de fábrica. Escreva um algoritmo que leia o nome do modelo de um carro, seu custo de fábrica e os percentuais de revenda e de impostos e escreva o custo ao consumidor do carro.
algoritmo "Cálculo de custo de um automóvel"
var
modelo:literal
custofab,prevenda,impostos,custoInicial,custoFinal:real
inicio
escreval("Cálculo do custo de um automóvel.")
escreval(" Digite o nome do modelo do carro ")
leia (modelo)
escreval(" Digite o custo de fábrica")
leia (custofab)
escreval(" Digite os percentuais de revenda ")
leia (prevenda)
escreval(" Digite o valor dos impostos ")
leia (impostos)
custoInicial <- (custofab+ (custofab*prevenda))
custoFinal <- (custoInicial+impostos)
escreval(" O custo do automóvel modelo ",modelo,", é de R$",custoFinal:5:2)
escreval ("****FIM****")
fimalgoritmo
Profº Piva - Algoritmos - Exercícios Capítulo 2.16) Escreva um algoritmo que leia um valor composto apenas de 0’s e 1’s representando um número na base binária (com até 6 dígitos ou bits). O algoritmo deve escrever esse mesmo número na base decimal. A conversão de binário para decimal é feita somando –se os produtos de cada digito do número binário, por seu peso, sendo que o digito mais à direita tem peso 1 (2°), o seguinte tem peso 2 (2¹), 4 (2²), 8 (2³), etc. Por exemplo 110101 é 53 . (1x32 + 1x 16 + 0x8 + 1x4 + 0x 2 + 1x1 = 32 + 16 + 0 + 4 + 0 + 1 = 53)
algoritmo "Cálculo de conversão binária para decimal"
var
b1,b2,b3,b4,b5,b6,decimal:real
inicio
escreval("Cálculo de conversão binária para decimal")
escreval("Digite os binários(0 ou 1) de um a um da esquerda para a direita.")
escreva("Digite o 1º bit ")
leia (b1)
escreva("Digite o 2º bit ")
leia (b2)
escreva("Digite o 3º bit ")
leia (b3)
escreva("Digite o 4º bit ")
leia (b4)
escreva("Digite o 5º bit ")
leia (b5)
escreva("Digite o 6º bit ")
leia (b6)
decimal <- (b6*1)+(b5*2)+(b4*4)+(b3*8)+(b2*16)+(b1*32)
escreval("Os números ",b1,b2,b3,b4,b5,b6," na base binária,")
escreval("Equivalem a ",decimal," na base decimal.")
escreval ("****FIM****")
fimalgoritmo
Profº Piva - Algoritmos - Exercícios Capítulo 2.15) Escreva um algoritmo que leia o valor do raio e calcule a área do circulo correspondente.
algoritmo "Calculo area circulo"
var
r, area:real
inicio
escreval ("Calculo para descobrir a area do circulo")
escreval ("Digite o valor do raio do circulo")
leia (r)
area <- 3.14*r^2
escreval ("A area desse circulo é igual a ",area,".")
escreval ("****FIM****")
fimalgoritmo
Profº Piva - Algoritmos - Exercícios Capítulo 2.14) Escreva um algoritmo que calcule a quantidade de latas de tinta necessárias e o custo para pintar tanques cilíndricos de combustível, onde são fornecidos (o algoritmo lê) a altura (h ) e o raio ) e o raio ( r ) desse cilindro. Sabe-se que a lata de tinta anticorrosiva custa R$ 40.00, cada lata contem 5 litros e cada litro pinta 3 metros quadrados na média. Para que fique bem coberto de tinta, há necessidade de 2 demãos.
algoritmo "Cálculo da quantidade de lata de tinta necessária"
var
h,r,areat,qt,lata,qtdet,pt:real
inicio
escreval("Cálculo da quantia necessária de tinta para pintar tanques cilíndricos")
escreva("Digite quanto tanque sera pintado")
leia(qt)
escreva("Digite a altura correspondente do tanque em metros ")
leia(h)
escreva("Digite o raio correspondente do tanque em metros ")
leia(r)
areat <- (2*3.14*r*h) + (2*3.14*r^2)
escreval("A área correspondente a um tanque é ",areat," metros.")
lata <- (areat*qt)*2/15
pt <- lata*40
escreval("Será necessário ",lata:5:2," lata(s) de tinta, para pintar os tanques.")
escreval("O preço total da tinta é de R$",pt:5:2,".")
escreval("*** F I M ***")
fimalgoritmo
Profº Piva - Algoritmos - Exercícios Capítulo 2.13) Escreva um algoritmo que calcule e escreva o valor de um termo an qualquer de uma progressão geométrica dada por:
an = a1 x q (2.5)
onde a1, é o primeiro termo da série, an, é o enésimo termo, q é a razão e n é o numero de termos.
Os valores de a1, q e n serão fornecidos pelo usuário.
Resposta:
onde a1, é o primeiro termo da série, an, é o enésimo termo, q é a razão e n é o numero de termos.
Os valores de a1, q e n serão fornecidos pelo usuário.
Resposta:
algoritmo "Calculo da progressão geometrica"
var
a1,q,n,an:real
inicio
escreval("Calculo da progressão geometrica")
escreva("Digite o valor de a1 ")
leia(a1)
escreva("Digite o valor de q ")
leia(q)
escreva("Digite o valor de n ")
leia(n)
an <- a1*(q^(n-1))
escreval("O valor de an é igual a ",an)
escreval("*** F I M ***")
fimalgoritmo
Profº Piva - Algoritmos - Capitulo 2.12) Escreva um algoritmo que calcule e escreva a soma Sn dos n primeiros termos de uma progressão aritmética dada pela formula:
Os valores de a1, an e r (a razão da progressão) serão fornecidas pelo usuário.
Resposta:
Resposta:
algoritmo "Cálculo da progressão aritmétrica"
var
a1,an,r,sn,n:real
inicio
escreval("Calculo da progressão aritmétrica")
escreva("Digite o valor de a1 ")
leia (a1)
escreva("Digite o valor de an ")
leia (an)
escreva("Digite o valor de r ")
leia (r)
n <-((an-a1)/r)+1
sn <-((a1+an)/2)*n
escreval("A soma Sn dos n primeiros termos da progressão aritmétrica é igual a ",Sn,".")
escreval("*** F I M ***")
fimalgoritmo
Profº Piva - Algoritmos - Exercícios Capítulo 2.11) Em uma pizzaria, cada tulipa de chope custa R$ 2,80 e, uma pizza mista grande custa R$ 20.00 mais R$ 1.50 por tipo de cobertura pedida (queijo, presunto, banana, etc.). Uma turma vai à pizzaria e pede uma determinada quantidade de chopes e pizzas grandes com uma determinada quantidade de coberturas. Escreva um algoritmo que calcula a conta e, sabendo quantas pessoas estão à mesa,
algoritmo "Calculo Conta"
var
tul,pizzagde,cobt,qtdepessoas,txgarcom,vlrpessoa,vlrped,vlrtt:real
inicio
escreval ("Digite a quantidade de tulipa consumidas")
leia (tul)
escreval ("Digite a quantidade de pizzas consumidas")
leia (pizzagde)
escreval ("Digite a quantidade de coberturas consumidas")
leia (cobt)
escreval ("Digite a quantidade de pessoas na mesa")
leia (qtdepessoas)
vlrped <- (tul*2.80)+(pizzagde*20)+(cobt*1.5)
txgarcom <- vlrped*0.1
vlrtt <- vlrped+txgarcom
vlrpessoa <- (vlrtt/qtdepessoas)
escreval ("O valor total da conta com os 10% do garcom eh igual a", vlrtt)
escreval ("O valor a ser pago por pessoa eh igual a R$:", vlrpessoa:5:2, " para cada")
fimalgoritmo
sábado, 25 de setembro de 2010
Profº Piva - Algoritmos - Exercícios Capítulo 2.8) No seguinte algoritmo existem erros de sintaxe? Em caso afirmativo, onde ?
01. altoritmo “Teste” - 1º erro
02. var
03. marca: literal - 2º erro
04. idade: numérico
05. letra: literal
06. marca : numérico
07. início
08. leia(idade) - 3º erro
09. escreva(idade)
10. idade = 678 - 4º erro
11. leia(“letra”)
12. leia(ABC) - 5º erro
13. escreva (letra)
14. letra <- 4 - 6º erro
15. fimalgoritmo
02. var
03. marca: literal - 2º erro
04. idade: numérico
05. letra: literal
06. marca : numérico
07. início
08. leia(idade) - 3º erro
09. escreva(idade)
10. idade = 678 - 4º erro
11. leia(“letra”)
12. leia(ABC) - 5º erro
13. escreva (letra)
14. letra <- 4 - 6º erro
15. fimalgoritmo
Profº Piva - Algoritmos - Exercícios Capítulo 2.10) Escreva um algoritmo que leia o nome de um piloto, uma distância percorrida em quilômetros e o tempo que o piloto levou para percorrê-la (em minutos). O algoritmo deve calcular a velocidade em km/h, e exibir a seguinte frase:
A velocidade média do <nome do piloto> foi
<velocidade média calculada> km/h
Resposta:
<velocidade média calculada> km/h
Resposta:
algoritmo "Nome Piloto e Velocidade Media em Km/h"
var
nomepiloto:literal
dpkm,tm,vkm:real
inicio
escreval ("Qual o nome do piloto")
leia (nomepiloto)
escreval ("Qual a distancia percorrida em km/h")
leia (dpkm)
escreval ("Tempo para realizar o percurso")
leia (tm)
vkm <- dpkm*tm // calculo vkm
escreva ("A velocidade media de -", nomepiloto, " foi - ", vkm, " km/h")
fimalgoritmo
Profº Piva - Algoritmos - Exercícios Capítulo 2.18) Uma revenda de carros paga a seus vendedores um salário de X reais por mês, acrescido de uma comissão de y reais para cada carro vendido e 4% do valor total de vendas. Escreva um algoritmo que leia o nome do vendedor, seu salário, número de carros que ele vendeu no mês e o valor total de suas vendas. O algoritmo deve escrever o nome e o salário final do vendedor.
algoritmo "Calculo salario do vendedor"
var
nomevendedor:literal
salarioInicial,salarioFinal,salarioComissao,Comissao,totalcarros, porcentagem:real
inicio
escreval ("Digite o nome do vendedor")
leia (nomevendedor)
escreval ("Digite o valor de seu salario")
leia (salarioInicial)
escreval ("Digite o valor da comissão por carro vendido")
leia (comissao)
escreval ("Digite a quantidade de carros vendidos no mes")
leia (totalcarros)
salarioComissao <- (comissao*totalcarros)
salarioFinal <- salarioComissao*0.04
escreva (" O vendedor," nomevendedor "vendeu," totalcarros " e seu salario sera de R$: " salarioFinal)
fimalgoritmo
var
nomevendedor:literal
salarioInicial,salarioFinal,salarioComissao,Comissao,totalcarros, porcentagem:real
inicio
escreval ("Digite o nome do vendedor")
leia (nomevendedor)
escreval ("Digite o valor de seu salario")
leia (salarioInicial)
escreval ("Digite o valor da comissão por carro vendido")
leia (comissao)
escreval ("Digite a quantidade de carros vendidos no mes")
leia (totalcarros)
salarioComissao <- (comissao*totalcarros)
salarioFinal <- salarioComissao*0.04
escreva (" O vendedor," nomevendedor "vendeu," totalcarros " e seu salario sera de R$: " salarioFinal)
fimalgoritmo
Profº Piva - Algoritmos - Exercícios Capítulo 2.6) Assinale com um X os comandos de atribuição considerados inválidos:
var
NOME, COR, TESTE, DIA, X : literal
SOMA, NUM: numérico
1. (X) NOME <- 5
2. ( ) SOMA <- NUM + 2*X
3. (X)TESTE <- SOMA
4. ( ) NUM <- SOMA
5. ( ) COR <- “PRETO”
6. ( ) X <- X + “1”
7. (X) NUM <- “ABC”
8. ( ) DIA<- “seGUNDA”
9. (X) SOMA + 2 <- NUM
10. (X) X <- (NOME = COR)
11. (X) “ABC” <- NOME
12. (X) NOME <- DIA + COR
NOME, COR, TESTE, DIA, X : literal
SOMA, NUM: numérico
1. (X) NOME <- 5
2. ( ) SOMA <- NUM + 2*X
3. (X)TESTE <- SOMA
4. ( ) NUM <- SOMA
5. ( ) COR <- “PRETO”
6. ( ) X <- X + “1”
7. (X) NUM <- “ABC”
8. ( ) DIA<- “seGUNDA”
9. (X) SOMA + 2 <- NUM
10. (X) X <- (NOME = COR)
11. (X) “ABC” <- NOME
12. (X) NOME <- DIA + COR
Profº Piva - Algoritmos - Exercícios Capítulo 2.7) Escreva um algoritmo que calcule o valor de base (expoente). O algoritmo deve ler o valor da base e do expoente. Após, ele deve escrever o valor de base (expoente).
algoritmo "Calculo da base e expoente"
var
base,expoente,baseexpoente:real
inicio
escreval ("Qual o valor da base")
leia (base)
escreval ("Qual o valor do expoente")
leia (expoente)
baseexpoente <- base^expoente
escreval ("O valor da base e expoente eh igual", baseexpoente)
fimalgoritmo
Profº Piva - Algoritmos - Exercícios Capítulo 3.11) Escreva um algoritmo que leia um dia, mês e ano e escreva, para essa data lida, o número de dias transcorridos no ano.
algoritmo "Dias Corridos"
var
dia,mes,ano,dc:inteiro
inicio
escreva ("Entre com o dia")
leia (dia)
escreva ("Entre com o mes")
leia (mes)
escreva ("Entre com o ano")
leia (ano)
se ((ano%4)= 0) entao
dc <- 366
senao
dc <- 365
fimse
se (mes=12) entao
dc <- dc - 31
dc <- dc + dia
senao
dc <- dc + dia
fimse
se (mes=11) entao
dc <- dc - 30
dc <- dc + dia
senao
dc <- dc + dia
fimse
se (mes=10) entao
dc <- dc - 31
dc <- dc + dia
senao
dc <- dc + dia
fimse
se (mes=9) entao
dc <- dc - 30
dc <- dc + dia
senao
dc <- dc + dia
fimse
se (mes=8) entao
dc <- dc - 31
dc <- dc + dia
senao
dc <- dc + dia
fimse
se (mes=7) entao
dc <- dc - 30
dc <- dc + dia
senao
dc <- dc + dia
se (mes=6) entao
dc <- dc - 31
dc <- dc + dia
senao
dc <- dc + dia
fimse
se (mes=5) entao
dc <- dc - 30
dc <- dc + dia
senao
dc <- dc + dia
fimse
se (mes=4) entao
dc <- dc - 31
dc <- dc + dia
senao
dc <- dc + dia
fimse
se (mes=3) entao
dc <- dc - 30
dc <- dc + dia
senao
dc <- dc + dia
fimse
se (mes=2) entao
se ((ano%4)=0) entao
dc <- dc - 29
dc <- dc + dia
senao
dc <- dc - 28
dc <- dc + dia
fimse
senao
dc <- dia
fimse
se (mes=1) entao
dc <- dc - 31
dc <- dc + dia
senao
dc <- dc + dia
fimse
fimalgoritmo
Profº Piva - Algoritmos - Exercícios Capítulo 3.17) Escreva um algoritmo que leia a quantia R$ em dinheiro que uma pessoa tem para enviar cartas, o preço PE de um envelope, o preço PS de um selo, a quantidade QS de selos que a pessoa jáo preço PE de um envelope, o preço PS de um selo, a quantidade QS de selos que a pessoa já dispõe e a quantidade de envelopes QE que a pessoa também já dispõe. O algoritmo deve calcular e informar quantas cartas a pessoa pode enviar.
algoritmo "Cartas"
var
rs,pe,ps,ce:real
qs,qe,qer,qce,qca,qsa,qea:inteiro
inicio
leia (rs,pe,ps,qs,qe)
ce <- pe+ps
se (qe > qs) entao
qer <- qe - qs
se (qer*ps) <= rs)
qce <- qs
qca <- rs div ce
qce <- qce + qca
senao
qsa <- rs div ps
qce <- qs + qsa
fimse
senao
se (qs>qe) entao
qer <- qs - qe
se ((qer*pe) < = rs) entao
rs <- rs - (qer*pe)
qce <- qe
qca <- rs div ce
qce <- qce + qca
senao
qea <- rs div pe
qce <- qe + qea
fimse
senao
qce <- qs
qca <- rs div ce
qce <- qce <- qca
fimse
fimse
escreva (" A quantidade de cartas enviadas eh", qce)
fimalgoritmo
Profº Piva - Algoritmos - Capitulo 2.5) Assinale com um X os nomes de variáveis válidos:
1. (X) abc
2. ( )3abc
3. (X)a
4. ( )123ª
5. ( )-a
6. ( )acd1
7. ( )-_ad
8. ( )A&a
9. ( ) prim-nom
10. ( ) A123
11. (X)Aa
12. ( ) prim_nom
13. ( ) ABC DE
14. ( ) etc.
15. (X) E
16. (X)”nome”
2. ( )3abc
3. (X)a
4. ( )123ª
5. ( )-a
6. ( )acd1
7. ( )-_ad
8. ( )A&a
9. ( ) prim-nom
10. ( ) A123
11. (X)Aa
12. ( ) prim_nom
13. ( ) ABC DE
14. ( ) etc.
15. (X) E
16. (X)”nome”
sexta-feira, 24 de setembro de 2010
Profº Piva - Algoritmos - Exercícios Capítulo 2.9) Um representante comercial realizará uma viagem de vários dias com um automóvel, e, após, deseja saber a quilometragem média por litro de gasolina. Para isso, ele anotará a quilometragem no velocímetro ao sair de viagem e, depois, a quilometragem na chegada, ele também vai somar toda gasolina (em litros) usada para abastecer o carro durante a viagem. Escreva um algoritmo que, a partir desses dados, informe a quilometragem média por litro de gasolina.
algoritmo "Quilometragem media por litro de gasolina"
var
kmInicial,kmFinal,gasolina,kmMedia,litroporkm:numerico
inicio
escreva ("Qual a quilometragem inicial: ")
leia (kmInicial)
escreva ("Qual a quilometragem final: ")
leia (kmFinal)
escreva ("Qual o valor em litros de gasolina durante a viagem: ")
leia (gasolina)
kmMedia <- kmFinal-kmInicial
escreval ("Total de Quilometros percorridos",KmMedia)
litroporkm <- kmMedia/gasolina
escreval ("A quilometragem media por litro de gasolina eh: ",litroporkm)
fimalgoritmo
var
kmInicial,kmFinal,gasolina,kmMedia,litroporkm:numerico
inicio
escreva ("Qual a quilometragem inicial: ")
leia (kmInicial)
escreva ("Qual a quilometragem final: ")
leia (kmFinal)
escreva ("Qual o valor em litros de gasolina durante a viagem: ")
leia (gasolina)
kmMedia <- kmFinal-kmInicial
escreval ("Total de Quilometros percorridos",KmMedia)
litroporkm <- kmMedia/gasolina
escreval ("A quilometragem media por litro de gasolina eh: ",litroporkm)
fimalgoritmo
segunda-feira, 20 de setembro de 2010
Profº Piva - Exercícios Capitulo 3.6) Um sistema de equações lineares do tipo:
a x X + b x y = c
d x X + e x y = f
pode ser resolvido da seguinte forma:
x = c x e - b x f
a x e - b x d
y = a x f – c x d
a x e – b x d
Escreva um algoritmo que leia os coeficientes a, b, c, d e f e calcule e escreva os valores de x e y.
Lembre-se de que os denominadores das equações não podem ser zero.
Resposta:
algoritmo "Exercicio 3.6"
var vA,vB,vC,vD,vE,vF,x,y:real
inicio escreval("Informe o valor de 'a':")
leia(vA)
escreval("Informe o valor de 'b':")
leia(vB)
escreval("Informe o valor de 'c':")
leia(vC)
escreval("Informe o valor de 'd':")
leia(vD)
escreval("Informe o valor de 'e':")
leia(vE)
escreval("Informe o valor de 'f':")
leia(vF)
se (vA=0 ou vE=0) entao
escreva("O valor de 'a' e 'e' não podem ser igual a 0(zero)")
senao
x<- ((vC*vE)-(vB*vF))/((vA*vE)-(vB*vD))
y<- ((vA*vF)-(vC*vD))/((vA*vE)-(vB*vD))
fimse
fimalgoritmo
d x X + e x y = f
pode ser resolvido da seguinte forma:
x = c x e - b x f
a x e - b x d
y = a x f – c x d
a x e – b x d
Escreva um algoritmo que leia os coeficientes a, b, c, d e f e calcule e escreva os valores de x e y.
Lembre-se de que os denominadores das equações não podem ser zero.
Resposta:
algoritmo "Exercicio 3.6"
var vA,vB,vC,vD,vE,vF,x,y:real
inicio escreval("Informe o valor de 'a':")
leia(vA)
escreval("Informe o valor de 'b':")
leia(vB)
escreval("Informe o valor de 'c':")
leia(vC)
escreval("Informe o valor de 'd':")
leia(vD)
escreval("Informe o valor de 'e':")
leia(vE)
escreval("Informe o valor de 'f':")
leia(vF)
se (vA=0 ou vE=0) entao
escreva("O valor de 'a' e 'e' não podem ser igual a 0(zero)")
senao
x<- ((vC*vE)-(vB*vF))/((vA*vE)-(vB*vD))
y<- ((vA*vF)-(vC*vD))/((vA*vE)-(vB*vD))
fimse
fimalgoritmo
Profº Piva - Exercícios Capitulo 3.5) Escreva um algoritmo que lê dois números inteiros e informa se o primeiro é múltiplo do segundo.
algoritmo " São múltiplos ou não múltiplos"var
x,y:real
inicio
escreval(" São múltiplos ou não múltiplos.")
escreva(" Digite o primeiro número = ")
leia(x)
escreva(" Digite o segundo número = ")
leia(y)
se ((x>y e ((x mod y)= 0)) entao
escreva ("São múltiplos.")
senao
escreva("Não são múltiplos.")
fimse
fimalgoritmo
x,y:real
inicio
escreval(" São múltiplos ou não múltiplos.")
escreva(" Digite o primeiro número = ")
leia(x)
escreva(" Digite o segundo número = ")
leia(y)
se ((x>y e ((x mod y)= 0)) entao
escreva ("São múltiplos.")
senao
escreva("Não são múltiplos.")
fimse
fimalgoritmo
Assinar:
Postagens (Atom)