Pascal/Turbo Pascal - Programita

Hola tengo que hacer un programa en turbo pascal, que me cuente todas las palabras de un fichero de texto, xo esk nosé como hacerlo,, no puedo usar arrays. Alguien me puede ayudar?? Si alguien me puede poner el código, se lo agradecería.

Lo que tendrías que hacer es: 1-Abrir el archivo, después utilizar la funcion EOL (End of line) para leer cada una de las lineas de texto, estas lineas guardarlas en una vareable (ésto seria readln(archivo, variable)) y luego sacar la longitud de cada una de las varialbes que contienen las cadenas y utilizar una funcion que te cuantes los espacios de "blanco" a "blanco" digamos.
...Y listo!
Suerte