[Resolvido] desenvolver um algoritimo

[diguinhomendes 0]

encontrar o consumo médio de um veiculo,conhecidos a distância total e os litros de combustivel consumido para percorrer tal distancia.No final devera apresentar as seguintes informações:.consumo:.distancia percorrida>e valor gasto na viagem,sabendo,que o valor do combustivel é de R$2,90 cada litro.se o consumo for superior ou igual a 12 litros por quilometros,escreva"veiculo requer revisao".

algoritmo "consumo_médio"
// Função :encontrar o consumo médio de um veiculo,conhecidos a distância total e os litros de combustivel consumido para percorrer tal distancia.No final devera apresentar as seguintes informações:.consumo:.distancia percorrida>e valor gasto na viagem,sabendo,que o valor do combustivel é de R$2,90 cada litro.se o consumo for superior ou igual a 12 litros por quilometros,escreva"veiculo requer revisao".
// Autor :diguinhomendes
// Data : 21/3/2010
// Seção de Declarações 
var
    dt,lc,cons:real
inicio
    escreva("digite a distancia total: ")
    leia(dt)
    escreva("digite os litros consumidos: ")
    leia(lc)
    cons:=(dt/lc)
    escreva("o seu consumo é: ",cons)
    se(lc*2.90)entao
        escreva("o valor gasto na viagem é: ")
    senao
        se(cons>12)entao
        escreva("consumo é superior a 12: ")
        escreval("o veiculo requer revisao")
        fimse
fimalgoritmo

O GALERA ME AJUDEM

[diguinhomendes 0]

ccalgoritmo "CONSUMOMEDIO"

// Função :

// Autor :diguinhomendes

// Data : 21/3/2010

// Seção de Declarações

var

dt,lc,cm,c,dp,vg:real

inicio

escreva("digite a distancia total: ")

leia(dt)

escreva("digite os litros consumidos: ")

leia(lc)

cm:=(dt/lc)

escreval("o consumo médio é: ",cm)

c:=(dt/cm)

escreval("o consumo é: ",c)

dp:=(c*cm)

escreval("a distancia percorrida é: ",dp)

vg:=(c*2.90)

escreval("o valor gasto é: ",vg)

se(c>=12)entao

escreval("o veiculo requer revisão")

fimse

 

fimalgoritmo