1votos

AutoNumeros (selfNumbers) en Haskell en JavaScript

por josejuan hace 3 años

.

Realizar el ejercicio acorde a los planteamientos dados en lenguaje de programación Haskell

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
function d(n) { 
    return n + String(n).split('').reduce((a,b) => ~~a + ~~b, 0); 
function Selfs(n) { 
    var v = Array(n + 1); 
    var r = []; 
    for(var i = 1; i <= n; i++) { 
        if(!v[i]) 
            r.push(i); 
        var j = d(i); 
        while(j <= n) { 
            v[j] = true; 
            j = d(j); 
    return r; 
 
function main () { 
    var n = 9999; 
    console.log(Selfs(n).slice(-20)); 

Comenta la solución

Tienes que identificarte para poder publicar tu comentario.