Line = STRING[80] has already been defined for a program. Write a short Pascal procedure (call it StarFill) that has as input a variable of type Line. The procedure is to replace all blank spaces in the string with asterisks, and return the altered string. For example, the string
"I love to ski in winter"would be returned as
"I*love*to*ski*in***winter"
TestData.txt and prints them to the screen with all blank spaces replaced with asterisks. You may use the procedure StarFill from the previous question without re-writing it here.
StarFill) called BlankCount that counts the number of blank spaces in a line, but does not alter them. (Hint: the clever student will see how to answer this question by making just a few minor modifications to StarFill.)
Count.