Seminar/Anna

Wiki-Quelltext dieser Seite.

<language>Pascal</language>
Das ist meine Testseite.

Meine erste Matheformel:
<math>\frac{2}{x} = 8x + 2</math>

Mein erster Kot:
<code id="4f20071c6f17a">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;

function fak(i:double) : double;
begin
  if (i=1)
    then result:=1
  else
    result:=fak(i-1)*i;
end;</code>

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