Van der Pol & Euler's method in mathematica 8

Hello,
I need help with writing code euler’s method. Solved the task set out in annex explicit function but my teacher was not satisfied. He wanted me wrote Euler method alone. Does anyone of you have an idea how to do it?

NDSolve[{y''[t] - (1 - y[t]*y[t])*y'[t] + y[t] == 0, y[0] == 1, y'[0] == 1}, y, {t, 0, 10}, 
    Method -> "ExplicitEuler", "StartingStepSize" -> 0.25]

The first step is to convert it to two coupled differential equations, one in y and the other in dy/dt