Quem sou eu

Minha foto
Aluna de "Banco de Dados - Fatec Indaiatuba".

segunda-feira, 27 de setembro de 2010

Profº Piva - Algoritmos - Exercícios Capítulo 3.12) Escreva um algoritmo que leia as notas das três provas de um aluno (p1, p2 e p3), calcule sua média aritmética e escreva-a. As notas devem estar no intervalo [0,10].

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

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

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
  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

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 de 1 a 31    -> ")
  leia(dm)
  escreva(" Digite o dia da semana de 1 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

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
  nome:literal
  vh,nh,sb,sl:real
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(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

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:


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:


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

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:


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

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

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”

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

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

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