Пожайлуста помогите решить диф. уравнение

Это решила Wolfram Mathematica
In[2]:= DSolve[{x'[t] == -x[t] - y[t], y'[t] == -7 x[t] - 3 y[t],
x[0] == 2, y[0] == 1}, {x[t], y[t]}, t]

Out[2]= {{x[t] ->
1/8 E^(-2 (1 + Sqrt[2]) t) (8 - Sqrt[2] +
8 E^(2 (-1 + Sqrt[2]) t + 2 (1 + Sqrt[2]) t) +
Sqrt[2] E^(2 (-1 + Sqrt[2]) t + 2 (1 + Sqrt[2]) t)),
y[t] -> -(1/8)
E^(-2 (1 + Sqrt[2]) t) (-4 - 15 Sqrt[2] -
4 E^(2 (-1 + Sqrt[2]) t + 2 (1 + Sqrt[2]) t) +
15 Sqrt[2] E^(2 (-1 + Sqrt[2]) t + 2 (1 + Sqrt[2]) t))}}

а тут http://www.mathprofi.ru/sistemy_differencialnyh_uravnenij.html разжевано на примере.