Algoritmo para Cálculo do Consumo de Combustível

Faça um algoritmo que calcule a quantidade de litros de combustível gasto em uma viagem, utilizando um automóvel que faz 12 Km por litro.

Para obter o cálculo, o usuário deverá fornecer o tempo gasto na viagem e a velocidade média durante a mesma. Desta forma, será possível obter a distância percorrida com a fórmula:

distância = tempo x velocidade

Tendo o valor da distância, basta calcular a quantidade de litros de combustível utilizada na viagem com a fórmula:

litros usados = distância / 12

O programa deverá apresentar os valores da velocidade média, tempo gasto na viagem, a distância percorrida e a quantidade de litros utilizados na vigem.

Pseudocódigo:

programa exercicio4
var
   tempo,velocidade, distancia, litros : real;
inicio
   leia tempo;
   leia velocidade;
   distancia ← tempo * velocidade;
   litros ← distancia / 12; 
 escreva velocidade;
 escreva tempo;
 escreva distancia;
 escreva litros;
fim.

Pascal:

// Autor: Rafael Oliveira
// Data: 25/02/2010
Program exercicio4 ;
 uses crt;
 var
   tempo,velocidade, distancia, litros : real; 
 Begin
   writeln('Insira tempo');
   readln(tempo);
   writeln('Insira velocidade');
   readln(velocidade);
     distancia := tempo * velocidade;
     litros := distancia / 12;
   writeln('Velocidade media = ', velocidade:5:0);
   writeln('O tempo gasto = ', tempo:5:0);
   writeln('A distancia = ', distancia:5:0);
   writeln('Total de litros = ', litros:5:0);
   writeln('Pressione para fechar');
readkey;  
End.