Ulam numbers: Difference between revisions
m
→{{header|XPL0}}
m (→{{header|Phix}}: added XPL0's t<=2 trick for a 3.75x speed-up) |
|||
Line 665:
if T <= 2 then Sums(Sum):= T;
];
List(Size):= Query;
Size:= Size+1;
quit;
];▼
Query:= Query+1; \possible next Ulam no.▼
];
▲ Query:= Query+1; \possible next Ulam no.
▲ ];
until Size >= N;
return Query;
|