Forum: Algorithmen, Datenstrukturen und Klassendesign
Delphi
by Luckie,
1. Mai 2011
Das ist wohl nicht Sinn der (Schul)aufgabe. ;)
Forum: Algorithmen, Datenstrukturen und Klassendesign
Delphi
by Luckie,
1. Mai 2011
function ReverseString(const InString: AnsiString): AnsiString;
var
i: Integer;
begin
SetLength(Result, Length(InString));
for i := Length(InString) downto 1 do
begin
Result := InString;
end;
end;
Forum: Algorithmen, Datenstrukturen und Klassendesign
Delphi
by Luckie,
1. Mai 2011
Und was ist der Fehler? Eine Forensuche nach String rückwärts oder ähnliches sollte auch helfen.