wraith-lang/euler001.w

18 lines
257 B
OpenEdge ABL

struct Program
{
static Main(): int
{
sum: int = 0;
for (i: int in [1..1000])
{
if ((i % 3 == 0) || (i % 5 == 0))
{
sum = sum + i;
}
}
return sum;
}
}