Pawn - gregorymorrison/euler1 GitHub Wiki

Pawn

Euler1

// Euler1 in Pawn

euler1(size) {
    new retval = 0
    for(new i=1; i<size; i++) {
        if (i%3 == 0 || i%5 == 0) {
            retval += i
        }
    }
    return retval
}

main()
{
   printf("%d", euler1(1000))
}

http://www.compileonline.com/compile_pawn_online.php

$ pawncc -i./ euler1.p -oeuler1.amx 2>&1
Pawn compiler 4.0.4733                  Copyright (c) 1997-2012, ITB CompuPhase
$ pawnrun euler1.amx
233168
Run time:     0.00 seconds
$