Konsolen Anwendung: WriteLn und ReadLn in gleicher Zeile

[braingrenade]

Moin !

Delphi-Quellcode:

program Project1;

{$APPTYPE CONSOLE}

uses
  SysUtils;
var s : string;

begin
   write('Gib deinen Namen ein: ');
   read(s);
   write('Hallo '+s);
   sleep(500);
end.

Einfach nur ln weglassen !

edit : Verdammt, letzter