procedure validateUser()
var username : string
var password : string
var tries : int
var validUser : boolean
tries := 0
validUser := false
loop
put "Username : " ..
get username
put "Password : " ..
get password
if (username = "sweeney") and (password = "teacher") then
put "Access granted!"
validUser := true
else
put "Access denied!"
end if
tries := tries + 1
exit when (tries >= 3) or (validUser = true)
end loop
end validateUser
%%%%%%%%%%% Main Program %%%%%%%%%%%%%%%%
put "Welcome to my username/password program"
validateUser()
put "End of program"
Comments (0)
You don't have permission to comment on this page.