C'est une question facile, bien qu'on puisse sûrement faire mieux en passant 5h à réfléchir (j'exagère un peu), un simple test de tous les nombres de 10 à 2008 suffit ici (ça ne prendra que quelques microsecondes de toutes façon...) :
1 2 3 4 5
| Pour i=1 à 2008
Si i divisible par (i/10)
Afficher i
FinSi
FinPour |
Avec un test divisiblePar, qui peut-être implémenté à l'aide du modulo en C, par exemple. (i/10) est bien sûr le résultat de la division "entière" (division euclidienne).
En Haskell ça donnerait :
filter (\i->(i `mod` (i `div` 10)) == 0) $ [10..2008]
Néanmoins, il faut remarquer que tous les nombres truncadivisibles au-dessus de 100 sont tous ceux qui finissent par 0 (forcément), tu es sûr que tu ne t'es pas trompé sur la définition ?
--
Jedaï
Partager