Anna

Aus ProgrammingWiki

Archivierte Version vom 2012-01-25T13:58:53+00:00. Aktuelle Version

\frac{2}{x} = 8x + 2

function caesar(text: string; verschiebung: integer): string;
  var i:integer;
  begin
    for i:=1 to length(text) do begin
      result:=result + chr(ord(text[i])+verschiebung);
    end;
  end;

write(caesar('hallo', 3));

Anna

Suche