ayuda con LISTAS(con cursores,arreglos y apuntadores)

[velapuerca88]

HOLA, tengo un problema , tengo que realizar el siguiente ejercicio:

"Dado un archivo en ASCII,construir un algoritmo que genere un indice,ordenado,de todas las palabras distintas contenidas en el archivo,contando la ocurrencia de cada una de ellas.luego listar la lista en pantalla."

La verdad no se por donde comenzar, si alguien tiene alguna idea, POR FAVOR AVISE.
muchas gracias!

[[Al González]]

Hola velapuerca88, se ve que esto es una tarea escolar. No hay problema en que solicites ayuda, pero tenemos por costumbre ayudar a los estudiantes sin estropear su aprendizaje ni evitarle un sano esfuerzo.

Dinos, de lo que señala ese ejercicio, ¿qué es lo que sí sabes hacer? Y, por otro lado, ¿qué conocimientos tienes de Delphi? (supongo que te lo piden que esté hecho en Delphi). ¿Sabes cargar un archivo de texto en memoria, manejar listas y buscar caracteres específicos dentro de una cadena String?

Saludos.

Al González.

[santiago14]

Mmmm, está lindo el ejercicio, me hace recordar aquellas viejas épocas de estudiante universitario pelo largo. Llena la carpeta de algoritmos y sueños...

Igualmente, no creo que al ejercicio propuesto le hagan falta cursores y apuntadores; bueno, arreglos si, eso seguro.
Habría que plantear un modulito que reciba una lista de palabras y devuelva un arreglo de la forma (palabra, cantidad). Aquí habría que tener en cuenta el asunto de los signos de puntuación (ignorarlos); también sería bueno que todas las palabras fueran uniformes (todo mayúsculas o todo minúsculas, para evitar problemas)
Posteriormente en otra parte lo ordenamos alfabéticamente.
Como estamos hablando de un algoritmo no creo que haga falta, en principio, demasiado rigor sintáctico con algún lenguaje, que por supuesto espero que sea Delphi al final.

Bueno, espero haber ayudado.

Santiago.

[velapuerca88]

El ejercicio lo tengo que entregar en delphi, Tengo 2 problemas importantes,
1 ) se podria ir leyendo linea por linea desde el archivo de texto(readln) para separar las palabras ??
2) suponiendo que para separar las palabras tome solo el caracter espacio, habia una funcion en delphi para seleccionar los caracteres anteriores al espacio, no recuerdo cual era.

SE ME OCURRE ALGO ASI PARA SEPARAR PERO NO SE BIEN QUE HACER
procedure separar (var s:string; var p:lista; separador:char; palabra:sring; )
var q : posicionlista;
i: integer;
begin
for i:=1 to lenght(s) do
if s[i]<> " " do // intento decir mientras sea distinto de espacio
palabra: = palabra+ s[i];

[santiago14]

Empezado por velapuerca88

El ejercicio lo tengo que entregar en delphi, Tengo 2 problemas importantes,
1 ) se podria ir leyendo linea por linea desde el archivo de texto(readln) para separar las palabras ??
2) suponiendo que para separar las palabras tome solo el caracter espacio, habia una funcion en delphi para seleccionar los caracteres anteriores al espacio, no recuerdo cual era.

SE ME OCURRE ALGO ASI PARA SEPARAR PERO NO SE BIEN QUE HACER
procedure separar (var s:string; var p:lista; separador:char; palabra:sring; )
var q : posicionlista;
i: integer;
begin
for i:=1 to lenght(s) do
if s[i]<> " " do // intento decir mientras sea distinto de espacio
palabra: = palabra+ s[i];

En principio habría que eliminar todos los símbolos especiales (, . ; : etc.) Hay una funciones que ayudan "strReplace" creo que se llama una de ellas. Puedes ver aquí para estas funciones.
Luego de eso, si podrías usar como separador el espacio y empezar a contar las palabras.
Para el ordenamiento usariamos la burbuja sin dudas.

Dejame que vea unas cosas y te ayudo un poco mas con el asunto del array con las palabras distintas.

[velapuerca88]

gracias! muy buenas las funciones.
Ahora, antes que nada tendria que pasar el contenido del archivo de texto a una string, como se podria hacer?. gracias