Module main()
Declare Integer speedLimit, speed, lowSpeed, highSpeed, overSpeed
Set lowSpeed = 20
Set highSpeed = 70
Display “Enter the speed limit.”
Input speedLimit
While speedLimit < lowSpeed OR speedLimit > highSpeed
Display “ERROR: the speed limit must be between, “ lowSpeed,”and”,highSpeed,”.”
Display “Enter the speed limit.”
Input speedLimit
End While
Display “Enter your speed.”
Input speed
Call calcSpeed(speedLimit,speed)
Display “You were going”, overSpeed,”MPH over the speed limit.”
End Module
Module calcSpeed(Integer Ref speedLimit,speed)
Set overSpeed = speedLimit – speed
End Module