Prolog
As revision for my Prolog class test on Friday I wrote a small program that works as a (very) simple calculator. %A simple calculator %By D. Duncombe add([],0). add([H|Tail],Total) :- add(Tail,Total2), Total is Total2 + H. mult([],1). mult([H|Tail],Total) :- mult(Tail,Total2), Total is Total2 * H. It allows you to add or multiply lists of numbers, the lists can be any size and the numbers can be any size (exceeding the Windows' Calculator that limits you to 32 digits, naughty naughty). So if you need to multiply 17 numbers of over 100 digits, I'm your man.