programm Anzeige integer ASCII Lösungsansatz Turbo Pascal ASCII Zeichen

ASCII

Von: , Frage gestellt am Mi, 29. Nov 2000

Moin
Ich hab da so einen Aufgabe bekommen in Turbo Pascal.
Die lautet :
Erstellen sie ein Programm zur anzeige von ASCII zeichen (ab zeichen 32).
a) Anzeige eines einzelnen ASCII Zeichens
b) Anzeige des gesammten ASCII Zeichensatz
c) Drucken des gesammten ASCII Zeichensatz

Für Teil und Komplettlösungen währe ich Dankbar ;o)
MfG Dirk

PS E-Mail : [E-Mail-Adresse entfernt]

2 Antworten zu dieser Frage

1. Antwort von nach einer Stunde hilfreich

   Re: ASCII

   Eine ganze Druckroutine hab ich auch nicht mehr im Kopf. Die TP-Zeiten hab ich schon seit längerem hinter mir *g*
   
   Zumindest ein Lösungsansatz:
   
   var
   HelpVar: Byte;
   
   for HelpVar := 32 to 255 do
   WriteLn(chr(HelpVar));
   

2. Antwort von nach einem Tag hilfreich

   Re: ASCII

   Hallo,
   
   Drucken:
   
   var
   Datei: Text;
   i:Integer;
   
   Assign(Datei, 'lpt1');
   Rewrite(Datei);
   for i:=32 to 255 do
   Write(Datei, chr(i), ' ');
   
   Gruss, Niels
   

Keine passende Antwort gefunden? Jetzt eigene Frage stellen!