Das Beispiel ist ein Kommandozeilenprogramm, Deine "Übersetzung" aber nicht.
ReadLn und WriteLn sind was für die Kommandozeile.
In 'ner
VCL-Anwendung kann man 'ne Ausgabe u. a. über ShowMessage machen.
Also WriteLn durch ShowMessage ersetzen und ReadLn entfernen.