Übungsaufgabe für alle :: Nr. 5 - Hamming-Distanz
Übersicht
BlitzBasic
Beginners-Corner
getlose |
Antworten mit Zitat |
|
|---|---|---|
|
@wunderkind
nebenbei erwähnt, deine aufgaben sind echt cool, macht spaß sie zu lösen ! kann man immer wieder etwas dazu lernen. |
||
|
|
Randall Flagg |
Antworten mit Zitat |
|---|---|---|
|
verdammte Scheiße, was ist dieses Hammingway-Moped überhaupt?
Kann man das in der Schule lernen? Wenn ja, ich hab's noch nicht gehabt |
||
|
|
DA |
Antworten mit Zitat |
|---|---|---|
|
Moin,
Thx DarkAngel |
||
| Deutscher Blitz Basic Chat | ||
|
|
jhabekost |
Antworten mit Zitat |
|---|---|---|
| net ganz, bei wiki wird OR angewendet wir dagegen benutzen XOR! | ||
|
|
Randall Flagg |
Antworten mit Zitat |
|---|---|---|
|
Das hört sich ja übelste Kompliziert an.
Danke für die Info DarkAngel |
||
|
|
DA |
Antworten mit Zitat |
|---|---|---|
|
Moin,
Wen ihr mal so schlau wäred und den ersten Post von Wunderkind lesen würdet, dan würdet ihr genau den gleichen Link bei ihm im Post finden. Edit: Das merkt man sehr! Thx DarkAngel |
||
| Deutscher Blitz Basic Chat | ||
- Zuletzt bearbeitet von DA am So, Feb 06, 2005 0:13, insgesamt 2-mal bearbeitet
|
|
Randall Flagg |
Antworten mit Zitat |
|---|---|---|
| Tut mir leid, wir sind aber nicht alle schlau. | ||
|
|
wunderkind |
Antworten mit Zitat |
|---|---|---|
|
Über die Hamming-Distanz könnte man eventuell etwas in der Schule im Fach Informatik hören, sonst eher nicht. Was ist das? Tja, dem Link folgen (steht hier jetzt ja schon mehrmals |
||
David |
Antworten mit Zitat |
|
|---|---|---|
|
Hi!
wunderkind hat Folgendes geschrieben: Der Einfachheit halber hätte ich eine Tabelle genommen, in der steht, wieviele Bits für den jeweiligen Wert gesetzt sind. Also etwa so:
Code: [AUSKLAPPEN] distance = value1 xor value2
distance = bit_table(distance) So in etwa hab ich das gemacht: Code: [AUSKLAPPEN] ; ======================= ; ; BitDist() ; Function BitDist( val1, val2 ) Local cnt = 0 Local i = 1 val3 = val1 Xor val2 While i < 256 If ( val3 And i ) Then cnt = cnt + 1 i = i * 2 Wend Return cnt End Function Nur statt der Tabelle eben... naja, man siehts ja! grüße |
||
|
|
wunderkind |
Antworten mit Zitat |
|---|---|---|
| So oder so ähnlich hatte ich das im Kopf. Die Lösungen weiter oben finde ich aber wie gesagt auch gut weil kreativ. | ||
|
|
Artemis |
Antworten mit Zitat |
|---|---|---|
|
Hä warum waren die ersten lösungen so lang das geht doch ganz kurz:
(oder ist da was falsch???)Code: [AUSKLAPPEN] zahl1 = Input("ZAHL 1 : ") zahl2 = Input("ZAHL 2 : ") bin1$ = Bin(zahl1) bin2$ = Bin(zahl2) Print bin1 Print bin2 If Len(bin1)>Len(bin2) Then anzahl = Len(bin1) Else anzahl = Len(bin2) EndIf For i = 1 To anzahl If Right(bin1,1) <> Right(bin2,1) Then hamming = hamming + 1 EndIf bin1 = Left(bin1,Len(bin1)-1) bin2 = Left(bin2,Len(bin2)-1) Next Print "HAMMING: "+hamming WaitKey End |
||
|
|
wunderkind |
Antworten mit Zitat |
|---|---|---|
|
So geht's auch. Es gibt ebend keine Musterlösung |
||
David |
Antworten mit Zitat |
|
|---|---|---|
|
Hi!
@JonasCleve: Du hast auch nur einen Teil der Lösung gemacht. Da ist das ganze wohl ein wenig kürzer... grüße |
||
Übersicht
BlitzBasic
Beginners-Corner
Powered by phpBB © 2001 - 2006, phpBB Group
