Luvun tulostaminen bitteinä

bitin_viilaaja

Mikähän olisi optimaalisin tapa tulostaa esimerkiksi 8-bittinen luku bittimuodossa?

Ajattelin tehdä silmukan, jossa olisi ensin maskina 0b1000000 ja se sitten naitettaisiin &-operaattorilla käsittelyssä olevaan 8-bittiseen lukuun. Jos tulos on 0, niin kyseinen bitti on nolla (tulostetaan vaikka printf():llä 0), ja muussa tapauksessa se olisi 1. Sitten shiftattaisiin maskia pykälän verran oikealle ja toistettaisiin hommaa lsb:hen saakka.

Vai onko olemassa joku yksinkertaisempi ja tehokkaampi tapa?

4

215

    Vastaukset

    Anonyymi (Kirjaudu / Rekisteröidy)
    5000
    • WituixMän

      Joskus tein aikoinaan tuollaisen koodinpätkän mutta käyttöä sille ei juurikaan ole ollut.
      Tulos tuli tekstinä tyyliin 10101101, lisäsin vielä vaihtoehdot v2 ja v3 joten
      v1=teksti
      v2=lukutaulukko
      v3=merkkitaulukko

      Muuttujat ja functiokutsu:

      Dim dluku As ULong = 1234567
      Dim BinT As String 'v1
      'Dim BinI() As Short 'v2
      'Dim BinC() As Char 'v3
      BinT = ToBin(dluku) 'v1
      'BinI = ToBin(dluku) 'v2
      'BinC = ToBin(dluku) 'v3

      ToBin-functio

      Function ToBin(ByVal luku As ULong)
      Dim btext As String = "" 'v1=teksti
      'Dim bint(7) As Short 'v2=lukutaulukko
      'Dim bchar(7) As Char 'v3=merkkitaulukko
      Dim bm As ULong = 8 'bittien määrä
      Dim vl As ULong = 0 'vertailuluku
      Try
      'selvitetään bittien määrä, 8,16,32 tai 64-bit
      While vl < luku
      vl = Math.Pow(2, bm)
      If luku > vl Then bm = bm * 2 'jos ei riitä niin kerrotaan bittien määrä kahdella
      If bm = 64 Then Exit While 'jos käyttää ULongon tilalla Long-muuttujaa niin 64 pitää vaihtaa 32:ksi
      End While
      'päivitetään v2 ja v3 tapauksissa muuttujat
      'ReDim bint(bm - 1) v2
      'ReDim bchar(bm - 1) v3
      For i = 0 To bm - 1
      'luetaan bitit takaa päin joten bitti joka on jakojäännös lisätään loppuun
      btext = luku Mod 2 & btext 'v1
      'bint(bm - 1 - i) = luku Mod 2 'v2
      'bchar(bm - 1 - i) = Convert.ToString(luku Mod 2) 'v3
      luku = Math.Floor(luku / 2) ' jaetaan kahdella seuraavaa bittiä varten, pyöristys alas
      Next
      Catch
      MsgBox("Wituix män!!", MsgBoxStyle.Critical) 'noin käy jos on liian suuri luku
      Return Nothing
      Exit Function
      End Try
      '18446744073709551615 = suurin ULong
      Return btext 'v1
      'Return bint 'v2
      'Return bchar 'v3
      End Function

      Kuten arvoisa lukija huomaa on koodi Visual Basicia jota nykyisin käytän Visual Studio 2012:lla.
      Lopetin C :n käytön jo "valovuosia" sitten, aloitan sen uudelleen jos siihen löytyy hyvä syy. C# on joskus tarvinnut.

    • tietokoneinsinööri

      Ehkäpä ei ole merkittävästi tehokkaampaa keinoa, jos verrataan eri lähestymistapojen
      assembly-koodia, pakko käyttää (x86) SHR:ää/SHL:ää yms. ja vertailla vaikka lsb:tä/msb:tä AND:lla, kun mikroprosessorin rekisterit on nykyään vähintää 8-bittisiä tai sitten tallentaa ROM -muistiin 8-alkioinen taulukko, joka bitille oma alkio (0x80, 0x40, 0x20, 0x10, 0x08, 0x04, 0x02, 0x01) ja verrata niitä erikseen haluttuun lukuun. Muistin varaamisessa voi tulla eroa joskin merkitys suurempi ainoastaa rajoittuneiden resurssien ollessa käytössä (esim. ajetaan rinnakkain samaa ohjelmaa about 1000 kertaa).

      Vai olisikohan jonkin prosessoriperheen käskykannassa konekielinen komento, joka tekisi sen vähemmillä kellojaksoilla (onko jollakin parempaa tietoa)? Tietenkin voit itse suunnitella FPGA/ASIC-prosessorin tähän tarkoitukseen.

      https://en.wikipedia.org/wiki/Cycles_per_instruction

    • pcmuseo

      Ei ehkä optimaalisin, mutta:
      #include
      void main(int argc,char *argv[])
      {
      unsigned char luku;
      char tulos[]="00000000b";
      char i=8;
      if(argc<2)return;
      luku=atoi(argv[1]);
      printf("%d=0x%x=",luku,luku);
      while(i--)
      {
      tulos[i]=luku&1?'1':'0';
      luku>>=1;
      }

      printf("%s\n",tulos);

      }

    • Jspsus

      Mä laittsisin:

      while(n!=0) {b=(n%2==0 ?"0": "1") b; n/2;}

      n = kymmenkantainen luku
      b = luku bitteinä

      Tuossa ei myöskään väliä monikobittinen luku, koska osaa ottaa lyhimmän mukaan.

    Ketjusta on poistettu 0 sääntöjenvastaista viestiä.

    Luetuimmat keskustelut

    1. Jos nainen harrastaa seksiä

      Useiden kanssa, miten se eroaa miesten mielestä siitä, jos miehellä on ollut useita s kumppaneita? Oletan että kaikki mi
      Ikävä
      308
      3148
    2. Ikävöin sinua kokoyön!

      En halua odottaa, että voisin näyttää sinulle kuinka paljon rakastan sinua. Toivon, että uskot, että olen varsin hullun
      Ikävä
      18
      1961
    3. Pihlaja-puulle

      Illat on mulle pahimpia. En tiiä miks se olis vaan parasta yöstä toiseen nukkua sun kanssa ja herätä sun kasvoihin. Jos
      Ikävä
      15
      1830
    4. Päivieni piristys, missä olet?

      Toit iloa ja valoa mun elämään ☀️ Nyt mennyt kohta viikko ettei ole nähty. Kaipaan nähdä sua silti ja pelkään vaikka tei
      Ikävä
      14
      1575
    5. Kova karman laki

      Karman lain kautta pahantekijä tehdessään pahaa toteuttaa koston ja rangaistuksen sille jolle pahaa on tehty. Tämä tarko
      Hindulaisuus
      399
      1451
    6. Kysymys Kuhmolaisille

      Hei. Olen 32 vuotias nainen ja muutin Kuhmoon noin 12 vuotta sitten. Mutta nyt täytyy ihmetellä ihan ääneen että onhan t
      Kuhmo
      35
      1337
    7. Savimajasta lääketieteen tohtoriksi - ja ei tikkua ristiin

      ”Jos ihminen muuttaa savimajasta tänne kerrostaloon länsimaisen elintason piiriin ilman että tarvitsee panna tikkua rist
      Maahanmuutto
      219
      1230
    8. Älä mahdollisesti ota itseesi

      En voinut tietää. Sitäpaitsi.. niin
      Ikävä
      17
      1084
    9. Olen valtavan ihastunut

      Yritin sen sinulle viime viikolla kertoa, mutta liikaa muuttujia ja isoja tunteita, niin en kyllä ollut kovin selkeä.
      Ikävä
      63
      1046
    10. Ensi viikolla tulen takaisin

      Ja käyn varmaan siellä monta kertaa. Monta mahdollisuutta nähdä jos olet siellä päin
      Ikävä
      20
      980
    Aihe