Analizar String de un archivo .txt

[qot2287]

Hola, soy nueva en esto , de un archivo de texto plano, tengo que saber cuantas letras aparecen por linea, y cuantos digitos por linea.

ejemplo:

ab3
3eMssa
ess

el resultado deberia ser
1.- 2 letras, 1 digito
2.- 5 letras, 1 digito
3.- 3 letras, 0 digito

ya se como cargar el archivo de texto y el ciclo para recorrer el archivo, y luego.
Para leer una linea uso Readln(T,s);
y un for i:=1 to lenght(s) do
pero nose como hacer la comparacion si s[i] es letra o un el digito.
como hacerlo comparando con el codigo ASCII s[i]=>41 o s[i]<=90 o s[i]=>97o s[i]<=122 para las letras y s[i]=>30 s[i]<=39 para los digitos...esa esta es mas o menos la idea que tengo