Apprendre simplement le binaire (C'est très facile) !

Sujets variés concernant le développement en PureBasic
Shadow
Messages : 1373
Inscription : mer. 04/nov./2015 17:39

Apprendre simplement le binaire (C'est très facile) !

Message par Shadow »

Saloute !

Voici comment apprendre le Binaire, c'est pas compliqué !
Avec ce code vous allez normalement tous comprendre !

Code : Tout sélectionner

; Créer par Mr Dieppedalle David le 28/05/2017.

Procedure.s ArbreBinaire(Nombre.q)
  
  Repeat
    
    ArbreBinaire.s + Str(Nombre.q) + " / 2 = " + Str(Nombre.q / 2)
    
    If Nombre.q % 2 = 0 ; Si Nombre / 2 est Entier (Pas de virgule)
      ArbreBinaire.s + ".0" + " = " + Str(Nombre.q / 2) + ", Reste 0" + #LF$
      NombreBinaire.s + "0"
      
    Else
      ArbreBinaire.s + ".5" + " = " + Str(Nombre.q / 2) + ", Reste 1" + #LF$
      NombreBinaire.s + "1"
      
    EndIf
    
    Nombre.q / 2
    
  Until Nombre.q = 0
  
  ArbreBinaire.s + #LF$ + "Nombre Binaire = " + NombreBinaire.s
  ProcedureReturn ArbreBinaire.s
  
EndProcedure

Debug ArbreBinaire(9223372036854775807)
Processeur: Intel Core I7-4790 - 4 Cœurs - 8 Thread: 3.60 Ghz.
Ram: 32 GB.
Disque: C: SDD 250 GB, D: 3 TB.
Vidéo: NVIDIA GeForce GTX 960: 2 GB DDR5.
Écran: Asus VX248 24 Pouces: 1920 x 1080.
Système: Windows 7 64 Bits.

PureBasic: 5.60 x64 Bits.
Avatar de l’utilisateur
falsam
Messages : 7244
Inscription : dim. 22/août/2010 15:24
Localisation : IDF (Yvelines)
Contact :

Re: Apprendre simplement le binaire (C'est très facile) !

Message par falsam »

Sujet que tu as déja évoqué en Mars 2016
:arrow: http://www.purebasic.fr/french/viewtopi ... 42#p181442

On ne va pas recommencer avec tes cours de binaire et bi-bi naire et autres :wink:

Et puis fred nous donne une fonction native.

Code : Tout sélectionner

Debug Bin(150)
d'ailleurs je le dis aussi dans ton sujet précédent.

[sujet déplacé de la section Tutorial à la section Discussion générale]
Configuration : Windows 11 Famille 64-bit - PB 6.03 x64 - AMD Ryzen 7 - 16 GO RAM
Vidéo NVIDIA GeForce GTX 1650 Ti - Résolution 1920x1080 - Mise à l'échelle 125%
Répondre