% 4. Write a program that asks the user to enter a word or phrase.
% Check to see if the user's input contains the word "use". Then
% a message will appear that tells the user that:
%
% a) whether or not the word "use" is found.
% b) if it is found, where it begins.
%
% Example :
% the user's input is "homework is helpful" Ouput : Not found
% the user's input is "alcohol abuse is unhealthy" Output : Found, starting at 11
%
% This program was created by: Peter Jozwik.
%Variables
var wordphrase : string
var wordlength, count : int
% Gets the phrase or word
put "Please type in any phrase, or any word"
get wordphrase : *
wordlength := length (wordphrase)
put ""
%Checks if the word "use" is located within the word or phrase
count := 0
for a : 1 .. wordlength - 2
if wordphrase (a .. a + 2) = "use"
then
put "Found, starting at line ", a
else
count := count
end if
if wordphrase (a .. a + 2) = "use"
then
count := count + 1
end if
end for
%One of the ending outputs ("Found" or "Not Found")
if count = 0
then
put "not found"
elsif count = 1 then
put "The word use has been used 1 time on line "
elsif count > 1 then
put "The word use has been used ", count, " times"
end if
|
