Registriert seit: 30. Mai 2008
407 Beiträge
Lazarus
|
Re: Wortumkehr mit ADT Stapel
29. Mär 2009, 10:36
Zitat von DeathsShadow:
Delphi-Quellcode:
Setlength(result,0);
for i := length(Text) downto 1 do
begin
Setlength(result,length(result)+1);
result[length(result)] := Text[i];
end;
Davon sollte man wirklich absehen, wenn man die Länge kennt, dann SetLength einmal vorher aufrufen.
Man kann einen Barbier definieren als einen, der alle diejenigen rasiert, und nur diejenigen, die sich nicht selbst rasieren.
Rasiert sich der Barbier?
|