: I NEED HELP ON THE SOURCE CODE ON HOW TO STORE A FILE AND RETRIEVED WHEN CALLED UPON
That is a very general question, but here are two sources, which will store and then display any number f lines entered by the user. For more specialized file-IO, you need to be more specific in your question.
write('enter a text:'); readln(s);
write('Want to stop ?');
while not eof(f) do begin