EXEC3

Esta é uma pré-visualização de arquivo. Entre para ver o arquivo original

algoritmo "CONSUMO MÉDIO"
// Função :3.Escrever um algoritmo para determinar o consumo médio de um
//automóvel sendo fornecida a distância total percorrida pelo automóvel
//e o total de combustível gasto.
// Autor : FRANCISCO LEANDRO VENCESLAU ALVES
// Data : 10/10/2013
// Seção de Declarações 
var
 CONS,DIST,ABAST: REAL
inicio
ESCREVA("QUANTIDADE DE LITROS ABASTECIDO:")
LEIA(ABAST)
LIMPATELA
ESCREVA("QUANTIDADE DE KM PERCORRIDO:")
LEIA(DIST)
LIMPATELA
CONS:= DIST/ABAST
ESCREVAL("CONSUMO APROXIMADO EM KM/l:",CONS)
fimalgoritmo