Ergebnis der Suchanfrage

• Forum: Object-Pascal / Delphi-Language

  Re: erklärt mir bitte ein programm

    Delphi
    by DeddyH, 18. Nov 2007
  Wenn der Autor das etwas anders formuliert hätte, wäre es einfacher zu verstehen gewesen:p:=p*2+ord(s)-ord('0');
  geändert inp := p shl 1 or (ord(s)-ord('0'));
  So wird es IMHO deutlicher ;)
• Forum: Object-Pascal / Delphi-Language

  Re: erklärt mir bitte ein programm

    Delphi
    by DeddyH, 18. Nov 2007
  Das Zeichen '0' hat im ASCII-Code den Wert 48, '1' den Wert 49 (wenn ich nicht irre, habe nicht nachgesehen). Durch Subtraktion kann also nur 0 oder 1 (als Zahl) dabei herauskommen. Was die Funktion tut, ist, einen String, der nur aus '0' und '1' besteht, binär wieder in eine Zahl zu wandeln. Schauen wir uns das mal mit der Beispielzahl 5 an (binär 101):
  
  Der String lautet also '101', p ist...