Yahoo Answers is shutting down on May 4th, 2021 (Eastern Time) and beginning April 20th, 2021 (Eastern Time) the Yahoo Answers website will be in read-only mode. There will be no changes to other Yahoo properties or services, or your Yahoo account. You can find more information about the Yahoo Answers shutdown and how to download your data on this help page.
Trending News
Esercizio macchina di turing, chi mi aiuta?
Controlla se una stringa binaria ci sono più 1 o più 0...
ad esempio se ho 111110 dovrebbe farmi notare semplicemente che ci sono più 1 (senza bisogno di specificarne la quantità) se invece ho 000010 dirmi che ci sono più zeri (anche qui stesso discorso per la quantità)....
aiutatemi perfavore, come posso fare? 10pt al migliore....
più che altro ho problemi a determinare il numero di stati necessari...se nn volete farmi l'esercizio aiutatemi a capire come posso gestire gli stati in generale in questo caso...grz infinite !!! =)
Non era questa l risposta che volevo ma ti do 10 pt uguale per il disturboXD
1 Answer
- 1 decade agoFavorite Answer
1 problemma come fai a determinare se ci sono più 1 o più 0 senza contarli ? Quindi dobbiamo prima contare quanti uni e quanti zeri. Io ti propongo questa soluzione:
contiamo quanti sono gli uni poi sottraiamo dalla lungezza della stringa il totale degli uni e troviamo gli zeri e adesso possiamo confrontarli e dire se ci sono più 1 o più 0.
Il secondo metodo è questo che ti posto....Il tuo problemma risolto in VB6:
Dim Stringa As String
Stringa = txtInput.Text
Dim I, totZeri, totUni As Integer
totZeri = 0
totUni = 0
For I = 1 To Len(Stringa)
If Mid(Stringa, I, 1) = "0" Then
totZeri = totZeri + 1
Else
totUni = totUni + 1
End If
Next I
If totZeri > totUni Then
'Se ci sono più zeri
Else
'se ci sono più uni
End If
