Rješavanje u Mathematica
DSolve[ {M y''[x] == - ρ ,y[0] == 0, y[d]==0}, y[x], x ]
DSolve[ {M y''[x] == - ρ ,y[0] == 0, y'[d]==0}, y[x], x ]
Created by Mathematica (December 3, 2003)