µLua DS - Forum officiel | Official forum Index du Forum

µLua DS - Forum officiel | Official forum
Le bon endroit pour en savoir plus sur MicroLua et pour parler de vos projets ! | The right place to learn more about MicroLua and talk about your projects !

 FAQFAQ   RechercherRechercher   MembresMembres   GroupesGroupes   S’enregistrerS’enregistrer   ProfilProfil   Se connecter pour vérifier ses messages privésSe connecter pour vérifier ses messages privés   ConnexionConnexion 

les nombres premiers

 
Poster un nouveau sujet   Répondre au sujet    µLua DS - Forum officiel | Official forum Index du Forum -> Section française -> Divers -> Hors-sujet
Sujet précédent :: Sujet suivant  
Auteur Message
geeker


Hors ligne

Inscrit le: 23 Déc 2012
Messages: 363

MessagePosté le: Mar 12 Mar 2013 - 12:18    Sujet du message: les nombres premiers Répondre en citant

Bonjour . J'ouvre ce topic pour ceux qui ont créé un programme (en µlua ou non) pour trouver les nombres premiers .
Comme je l'ais dit, le programme peut-être en µlua ou non .

Et je commence avec le mien, codé en Lua pur, plutôt rapide, et adaptable sur DS :
Code:



calcto = -1
--[[
print("Calculer jusqu'a :")
calcto = tonumber(read())
--]]
prelist = io.open('premiers.txt', 'w')
pp = {}
pp[1] = 1
pp[2] = 2
pp[3] = 3
np = 0
if not (prem) then
 prem = 1
end
ctrl = 1
print("Calculateur de nombres premiers .")
print("Par geeker .")
print("12/03/2013")
while prem ~= calcto do
 ctrl = prem
 pre = true
 while ctrl ~= 1 and pre == true do
  if (prem/2) == (math.floor(prem/2)) and prem ~= 2 then
   pre = false
   ctrl = 1
  end
  if (prem/3) == (math.floor(prem/3)) and prem ~= 3 and pre == true then
   pre = false
   ctrl = 1
  end
  if (prem/5) == (math.floor(prem/5)) and prem ~= 5 and pre == true then
   pre = false
   ctrl = 1
  end
  if (prem/7) == (math.floor(prem/7)) and prem ~= 7 and pre == true then
   pre = false
   ctrl = 1
  end
  if (prem/11) == (math.floor(prem/11)) and prem ~= 11 and pre == true then
   pre = false
   ctrl = 1
  end
  if (prem/ctrl) == (math.floor(prem/ctrl)) and pre == true then
   if ctrl ~= 1 and ctrl ~= prem then
    pre = false
   end
  end
  ctrl = ctrl - 1
 end
 if pre == true then
  np = np + 1
  prelist:write('\n'..tostring(prem)..' est premier . Premier n°'..tostring(np))
  print(tostring(prem)..' est premier . Premier n°'..tostring(np))
  pp[np] = prem
 end
 prem = prem + 1
end
prem = nil
np = nil
ctrl = nil
pre = nil
calcto = nil
pp = nil
prelist:close()




Allez à vous !
_________________
Beta-testeur de l'extrème
Tox: FFBDC8B34DC3CDE51F8F1CB0A628147DE740ACD1D44682EB5492A681F6541E32E8D8BB6052B3
CtrµLua: ctrulua.github.io
Des p'tits true, des p'tits true, toujours des p'tits true ...


Revenir en haut
Visiter le site web du posteur
Publicité






MessagePosté le: Mar 12 Mar 2013 - 12:18    Sujet du message: Publicité

PublicitéSupprimer les publicités ?
Revenir en haut
megagugus14


Hors ligne

Inscrit le: 03 Aoû 2012
Messages: 168

MessagePosté le: Mar 12 Mar 2013 - 18:09    Sujet du message: les nombres premiers Répondre en citant

Quelle différence avec la section Hombrew/Projets, à part faire connaître des programmes non µLua qui de toute façon peuvent être présenté via un thread sur le HS ?
_________________
Programmeur à 11 ans... Quoi, t'as un problème ?


Revenir en haut
MSN
geeker


Hors ligne

Inscrit le: 23 Déc 2012
Messages: 363

MessagePosté le: Mar 12 Mar 2013 - 19:18    Sujet du message: les nombres premiers Répondre en citant

ben ... à les regrouper !
_________________
Beta-testeur de l'extrème
Tox: FFBDC8B34DC3CDE51F8F1CB0A628147DE740ACD1D44682EB5492A681F6541E32E8D8BB6052B3
CtrµLua: ctrulua.github.io
Des p'tits true, des p'tits true, toujours des p'tits true ...


Revenir en haut
Visiter le site web du posteur
Reylak
Administrateur

Hors ligne

Inscrit le: 24 Nov 2008
Messages: 2 838
Localisation: Toulouse

MessagePosté le: Mar 12 Mar 2013 - 20:23    Sujet du message: les nombres premiers Répondre en citant

C'est un mégamix de scripts de tous langages sur un thème bien nerd :p
Perso j'ai un truc pas optimisé en BASIC Casio sur ma calculatrice c'est funky.
_________________


Plein d'infos sur le SourceForge !


Revenir en haut
Visiter le site web du posteur MSN Skype
Contenu Sponsorisé






MessagePosté le: Aujourd’hui à 03:45    Sujet du message: les nombres premiers

Revenir en haut
Montrer les messages depuis:   
Poster un nouveau sujet   Répondre au sujet    µLua DS - Forum officiel | Official forum Index du Forum -> Section française -> Divers -> Hors-sujet Toutes les heures sont au format GMT + 1 Heure
Page 1 sur 1

 
Sauter vers:  

Index | Creer un forum | Forum gratuit d’entraide | Annuaire des forums gratuits | Signaler une violation | Conditions générales d'utilisation
Powered by phpBB © 2001, 2005 phpBB Group
Traduction par : phpBB-fr.com