Anna

Aus ProgrammingWiki

Archivierte Version vom 2012-01-25T13:54:09+00:00. Aktuelle Version

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

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

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

Anna

Suche