Hat er (sieht man nur nicht, da der CODE-Block fehlt), aber besser wird es nicht wirklich.
Delphi-Quellcode:
unit u_HanoiKlasse;
{$mode ObjFPC}{$H+}
interface
type
TTurm=
class
Scheiben:
array [1..n] TTurm
Position : integer;
uses
Classes, SysUtils, Dialogs;
implementation
{ TScheibe }
end.
Wenn schon dann
richtig halbwegs vernünftig einzurücken.
Pascal (Delphi) wurde ja mal ursprünglich als "einfachere" Sprache erfunden, um leichter zu lernen, aber ein paar Grundkenntnisse wären angebracht, sie sich vorher zu verinnerlichen, um wenigstens die Syntax erstmal zu verstehen und anwenden zu können.