



附 绘图 mathematica 代码如下:
x1x1 = n UnitStep[n + 2];2x2 = (2^-n + 1) UnitStep[n + 1];3x3 = Which[n < 0, 3*2^n, n >= 0, n + 2];4x4 = x2 + x3;5
6DiscretePlot[x1, {n, -3, 3}, PlotRange -> All, GridLines -> Automatic]7DiscretePlot[x2, {n, -2, 5}, PlotRange -> All, GridLines -> Automatic]8DiscretePlot[x3, {n, -5, 3}, PlotRange -> All, GridLines -> Automatic]9DiscretePlot[x4, {n, -3, 3}, PlotRange -> All, GridLines -> Automatic]周期性,
非周期.
备注 对于
迭代得
输出信号为
波形图略.
二阶差分方程(二阶系统).
二阶差分方程(二阶系统).

备注 不知道有什么便捷的工具可以绘制系统框图;上图直接截的标答.
特征根为
于是
大概是题目打错了吧...这个计算量挺离谱的:
xxxxxxxxxx41RSolveValue[{2 y[n] - 2 y[n - 1] + 26 y[n - 2] - 2 y[n - 3] + y[n - 4] == 0,3 y[0] == 0, y[1] == 1, y[2] == 2, y[3] == -34}, y[n], n]齐次通解为
设特解为
于是全解为
代入初值,得
齐次通解为
设特解为
于是全解为
代入初值,得
全解为
代入即可解得.
标答有误.