Dev Pascal

Hallo

vieleicht kann mir jemand bei folgenden Problem helfen:

program HelloOne;

uses CRT;

const HELLOTEXT = 'Hallo';

var hallo, ! string;

begin
     clrScr;
     write ('Begruessungsprogramm');
     readLN (hallo, !);
     write ('Hallo! Wer bist du?');
     writeLN (hallo, !);
     readKey;
end.

Wenn ich das so eingebe erscheint immer die Fehlermeldung7 / 12 helloone.pas
 Fatal: illegal character '!' ($21)
 Kann mir jemand sagen was ich falsch mache bzw. anders eingeben muss?

Danke für die Hilfe im voraus