Seminar/Anna

Wiki-Quelltext dieser Seite.

<language>Pascal</language>
<math>\frac{2}{x} = 8x + 2</math>

<code id="4f20071c6f17a">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;</code>

<run id="4f20071c6f1ea">write(caesar('hallo', 3));</run>