What I am trying to do is create a Modula2 program that take

What I am trying to do is create a Modula-2 program that takes a file and returns a number of words in the read file as well as the frequency of each word that is read. Like if a file said, \"The fox fox fox jumped over the lazy dog.\" The output would be

(9 here being the total number of words.) So far I\'ve gotten the total word counter to work, and all of the words are displayed in that fashion, but I\'m stuck on how I would implement a frequency counter of each word. Here\'s the code.

Solution

0 <= Word<= 1000 This is the main loop