Grafikausgabe mit FreePascal (DOS)

[Glocke89]

Hallo Leutz

ich bin ein kleiner DOS-Freak und habe mir FreePascal für DOS heruntergeladen.
Das ganze sieht ganz gut aus und ich habe auch schon meine erstes "Programm" damit geschrieben....

Code:

program Zahlenraten;

var zufall,eingabe:integer;

{Unterprogramm Zahl_bestimmen}
procedure Zahl_bestimmen(var z:integer);
begin
  randomize;
  z:=random(10)+1
end;

{Unterprogramm Zahl_eingeben}
procedure Zahl_eingeben(var e:integer);
begin
  ReadLn(e)
end;

{Unterprogramm Zahl_pruefen}
function Zahl_pruefen(z,e:integer):boolean;
begin
  if z=e
    then
      Zahl_pruefen:=true
    else
      Zahl_pruefen:=false
end;

{Aufruf Hauptprogramm}
begin
  Zahl_bestimmen(zufall);
  WriteLn('Bitte eine beliebige Zahl zwischen 1 und 10 eingeben!');
  Zahl_eingeben(eingabe);
  if (1<=eingabe) and (eingabe<=10)
    then
      if Zahl_pruefen(zufall,eingabe)=true
        then
          WriteLn('Richtig geraten! Die Zahl war ',zufall,'.')
        else
          WriteLn('Falsch geraten! Die Zahl war ',zufall,'.')
    else
      WriteLn('Ungueltige Zahl!')
end.

(EXE-Datei siehe Anhang)

Auf jeden Fall wollte ich fragen, ob bei Pascal für DOS Grafikausgaben möglich sind und wenn ja, wie diese (erstmal ganz einfach) zu realisieren sind.

EDIT:
Titel auf Wunsch angepasst.