Algoritmo

algoritmo "nota 50"

// Função :

// Autor :

// Data : 01/12/2012

// Seção de Declarações

var

x : vetor [1..50] de inteiro

i : inteiro

i1 : inteiro

p: inteiro

valor: real

valor1: real

valor2: real

inicio

// Seção de Comandos

PARA p De 1 ATE 50 faca

leia (x[p])

fimpara

para p De 1 ATE 50 faca

valor <- valor + x[p]

fimpara

valor <- (valor/50)

valor1 <- valor + (valor * 0.01)

valor2 <- valor - (valor * 0.01)

para p De 1 ATE 50 faca

se x[p] >= valor1 entao

i <- i + 1

fimse

se x[p] >= valor2 entao

i1 <- i1 + 1

fimse

fimpara

fimalgoritmo que o carro teria antes do abastecimento.Considere que o veiculo

// sempre seja abastecido ate encher o tanque e que são fornecidas

// apenas a capacidade do tanque, a quantidade de litros abastecido e

// a kilometragem percorrida desde o ultimo abastecimento

// CAPACIDA DO TANQUE = CT

// QUANTIDADE DE LITROS ABASTECIDO = QLA

//QUILOMETROS PERCORRIDO = KM

//CONSUMO = C

//ALTONOMIA FUTURA = AF

// Autor : GRUPO SEIS

// Data : 22/11/2012

// Seção de Declarações

var

CT, QLA , km, C, AF, st: REAL

inicio

// Seção de Comandos

ESCREVAL ("DIGITE capacidade do tanque")

LEIA (CT)

ESCREVAL ("DIGITE Quantidade de litros abastecido")

LEIA (QLA)

ESCREVAL ("DIGITE Kilometragem percorrida")

LEIA (KM)

escreval ("consumo apos abastecido",km/qla)