Hola.
Esboza la idea en papel y lápiz tratando de seguir paso a paso lo que te solicitan,
Código:
PROCEDIMIENTO consumo
VARIABLES
litros, kilometros, velocidad, consumo : FLOTANTE
COMENZAR
litros <- 50
leer (kilometros, velocidad)
si velocidad < 110 entonces
consumo <- kilometros / 5 * 0.33
si no
consumo <- kilometros / 5 * 0.50
escribir ("Combustible consumido:", consumo)
escribir ("Combustible restante :", litros - consumo)
FIN
luego no es tán dificil codificarlo en Pascal.
Saludos