Euler-ada is a project mainly written in ADA and PYTHON, it's free.

A number of project euler solutions written in Ada, with an eye towards good software design