Seminar/Anna

Aus ProgrammingWiki

Wiki-Quelltext dieser Seite.

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

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

Mein erster Code:
<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;</code>

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

<code id="4f26a646607ee" hidden>function fak(i:double) : double;
begin
  if (i=1)
    then result:=1
  else
    result:=fak(i-1)*i;
end;

write(fak(10));</code>