lih

Implemente as seguintes funções, usando UNIT do pascal, para o tipo abstrato de dados FILA:
a) Insere(F, elemento): insere o elemento no fim na fila. Retorna 0 em caso de sucesso e -1 em caso de
fila cheia;
Remove(F): remove o elemento do inicio da fila. Retorna 0 em caso de sucesso e -1 em caso de fila
vazia;
c) EstaVazia(F): retorna TRUE se a fila estiver vazia e FALSE caso contrario;
d) Tamanho(F): devolve o tamanho (numero de elementos) da fila;
e) RemoveEDevolve(F, elemento): remove o elemento do inicio da fila, colocando o conteúdo no
parâmetro elemento. Retorna 0 em caso de sucesso e -1 em caso de fila vazia;
f) Imprime(F): imprime o conteúdo da fila;
Fazer um programa que mostre a utilização das funções implementadas na UNIT.
Dica
Definição da estrutura FILA
type TFila = record
elementos:array [0..c] of char;
fim, inicio, numeroElementos, indiceMaximo:integer;
end;