Mithilfe von MuPAD Light und dem möglichen Code
/* Anfang */
f := x -> a*x^ 3 + b*x^ 2 + c*x + d:
g := x -> h*x^ 3 + i*x^ 2 + k*x + m:
Bed := [
\
f(-1) = 1, \
f''(-1) = 0, \
\
f(1) = 4, \
f'(1) = g'(1), \
f''(1) = g''(1), \
g(1) = 4, \
\
g(3) = 3, \
g''(3) = 0 \
\
]:
Var := [a, b, c, d, h, i, k, m]:
solve(Bed, Var);
/* Ende */
bekommt man die Ausgabe:
{[a = -1/8, b = -3/8, c = 13/8, d = 23/8, h = 1/8, i = -9/8, k = 19/8, m = 21/8]}
(Alle Bezeichner entsprechen der ursprünglichen Frage.)