Pascal/Turbo Pascal - NECESITO AYUDA!!!!!

Hola

Necesito crear un programa que al ingresar frases cuente el numero de vocales, consonantes, numeros y simbolos todo dentro de un case y un length pero como estructuro el length?????

Les agradezco muchisimo su ayuda =0)!!!!!

¿Por qué dentro de un case?. Yo lo haría de esta manera.
Crearía dos conjuntos (set) uno con todas las vocales, otro con todas las consonantes (en minusculas y mayúsculas), luego hacia un ciclo que recorra la cadena por ejemplo
for i:=1 to length(frace) do
begin
if (frace[i] in vocales) then inc(contvoc)
else
if (frace[i] in consonantes) then inc(contcons)
else inc(contsimbol);
end;
donde contvoc, contcons y contsimbol serían contadores de vocales, consonantes y simbolos respectivamente.