Project Euler is a website which lists a series of mathematical problems which range in complexity from the relatively simple to the difficult. The first 100 problems are thought to be the easiest though.
I'd originally begun using thinBasic several years ago but didn't get too far, I seem to remember someone here suggesting using Basic4GL to solve the problems but I don't think they ever got started. So I thought I'd create this thread where everyone can post their solutions to the tasks.
I've solved the first problem... (which is probably the simplest)
If we list all the natural numbers below 10 that are multiples of 3 or 5, we get 3, 5, 6 and 9. The sum of these multiples is 23.
Find the sum of all the multiples of 3 or 5 below 1000.
dim i, sum
for i = 1 to 999
if (i % 3 = 0) or (i % 5 = 0) then printr "Num:" ; i sum = sum + i endif