Please put y with subscript p, NOT Subscript[y, p].
Usually, once the variable is defined it will be of blue color and once it executed (by pressing Shift+ Enter) it will change color to black. But, you can see that x and yp change to black, but Subscript[y, p] still remain in the same color. Why is this so? Is it default in Mathematica that if you use the subscripts as variable, the color will not change after execution? I am attaching the Mathematica file for your references.
Underlines are not allowed in variable names in Wolfram Language. I know that this is legal in other languages, and even a common idiom, but the underscore has a special meaning in Mathematica.
If you don’t like the typesetting construct Subscript[], then you can make up your own convention, as long as it does not involve underscores.
Using underscores does indeed not work; variables can not include underscores and can not start with a number. Also do not use Subscript or Superscript for variables, these should be used only as a typographical construct. Sooner or later you will get into trouble with those…