Hex-Zahlen in Turbo-Pascal

Computer: Software & Programmierung Delphi & Pascal
#1

Hallo!
Ich schreibe grad ein Programm zur Umwandlung von Hex-Zahlen
in Dezimalzahlen.
Dabei habe ich folgendes Problem:
Die Hex-Zahlen A,B,C,D,E,F kann ich nur als Dezimalzahlen
eingeben.

Wie kann ich das Programm so schreiben, daß TP die Hexzahlen in
Originalform bei der Eingabe „frißt“?

Auf eure Hilfe hoffend

Gunnar

#2

Ich glaub ich versteh die Frage nicht,
aber wenn ich sie doch verstanden habe dann hier die Antwort:

Du liest die Zahl vom Benutzer ein mit dem Befehl Read();
bei dem Befehl kannst du nicht nur Integer nehmen sondern auch z.B. einen „String“
also:

var s : string; und
readln(s);

wenn du nicht weisst wie man mit strings arbeitet
auf die erste stelle greift man mit s[1] zu auf die zweite mit
s[2] usw.

ansonsten schreib die frage nochmal so das ein dummer wie ich sie auch versteht *g*

MfG Roman

#3

Ich habe zur Zeit kein Pascal bei mir installiert, nach meinem Gedächtnis müßte es aber gehen wie folgt :
Eins nach dem anderen :

  1. Eingabe der Hex-Zahlen : geht wohl nur, wenn der Datentyp „array[1…-wieviel Du brauchst-] of char“ oder „string“ ist.
  2. Fehlerbehandlung der Eingabe : Prüfen, ob jede Zahl oder Buchstabe in einem „set of char“ enthalten ist, sieht, glaube ich, etwa so aus :
    s : string;
    s1 : set of char (‚0‘,‚1‘,…,‚0‘,‚A‘,‚a‘,‚B‘,‚b‘,…‚F‘,‚f‘);
    i,l : integer;

begin
readln(s);
l:=length(s);
for i:=1 to l do
begin
if s[i] not in s1 then ;
end;

end.

Sollte so etwa gehen. Bei größeren Problemen melde Dich noch 'mal.

Jörg

[Bei dieser Antwort wurde das Vollzitat nachträglich automatisiert entfernt]