Delphi-Quellcode:
var
i,ai:integer;
begin
for i:=1 to length(IntToStr(ai)) do
ai[i]:=char(23 xor ord(ai[i]));
end;
fehler: (e2016) Array-Typ erforderlich
will einfach nur einen integer verschlüsseln sollen nacher aber nich nur zahlen sein sondern auch buchstaben vorkommen.