Project Euler ... Problem #1
see http://projecteuler.net/index.php?section=problems&id=1
♥0 |
Line 52 |
Modified 2009-07-25 09:55:45 |
MIT License
archived:2017-03-10 21:49:26
ActionScript3 source code
/**
* Copyright mikeSven ( http://wonderfl.net/user/mikeSven )
* MIT License ( http://www.opensource.org/licenses/mit-license.php )
* Downloaded from: http://wonderfl.net/c/2T6i
*/
// see http://projecteuler.net/index.php?section=problems&id=1
package {
import flash.display.Sprite;
import flash.events.Event;
import flash.text.TextField;
public class FlashTest extends Sprite {
private var _t:TextField;
public function FlashTest() {
addEventListener(Event.ADDED_TO_STAGE, init, false, 0, true);
}
private function init(e:Event):void{
_t = new TextField();
_t.mouseEnabled = false;
_t.width = stage.stageWidth;
_t.height = stage.stageHeight;
_t.wordWrap = true;
_t.background = true;
_t.backgroundColor = 0x000000;
_t.textColor = 0x00FF00;
addChild(_t);
var n1:Number = 3;
var n2:Number = 5;
var n3:Number = 1000;
var a1:Array = [];
var i:Number = 0;
var max:Number = n3;
while( i < max){
var gN:Number = 0;
if( i%3 == 0){
gN = i;
}
if( i%5 == 0){
gN = i;
}
if(gN > 0){
a1.push(gN);
}
i++;
}
_t.appendText("Project Euler Problem 1: 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...........\n");
_t.appendText("the numbers to start adding are: \n");
var t:Number = 0;
for(var j:int = 0; j < a1.length; ++j){
var g:Number = a1[j];
t += g;
var s:String = String(g);
_t.appendText( g + ", ");
}
_t.appendText("\n\n........... and the answer is: ");
_t.appendText(String(t));
}
}
}