I copied the following as input text. Without attaching the notebook, how do I copy and post WL input like this to our community group so it is more readable and also easy for readers to copy and execute in a notebook?
GraphicsGrid[Table[
  DiscretePlot[((2/3)^(n/2) Subscript[\[ConstantC], 1] + (-1)^
       n (2/3)^(n/2) Subscript[\[ConstantC], 2]) UnitStep[n], {n, -5, 
    20}, PlotRange -> {-2, 2}, PlotStyle -> PointSize[0.02`], 
   AxesLabel -> {n, y}, ImageSize -> {400, 400}, 
   PlotLabel -> ("\!\(\*SubscriptBox[\(\[ConstantC]\), \(1\)]\) = " <>
       ToString[N[Subscript[\[ConstantC], 1], 2]] <> 
      ", \!\(\*SubscriptBox[\(\[ConstantC]\), \(2\)]\) = " <> 
      ToString[
       N[Subscript[\[ConstantC], 2], 2]])], {Subscript[\[ConstantC], 
   1], {-1, 1/2, 3/2}}, {Subscript[\[ConstantC], 
   2], {-1, 1/3, -3/2}}]]