When I was in junior high school I wrote a fully functioning perl on the TI-80 graphing calculator. It was about 200 lines of code, and it (almost) worked right the first time.