chinesisch

Inlandish Forum
Verfügbare Informationen zu "chinesisch"

  • Qualität des Beitrags: 0 Sterne
  • Beteiligte Poster: Anonymous
  • Forum: Inlandish Forum
  • Forenbeschreibung: Das offizielle inlandish Forum!
  • aus dem Unterforum: Internet
  • Antworten: 1
  • Forum gestartet am: Montag 24.10.2005
  • Sprache: deutsch
  • Link zum Originaltopic: chinesisch
  • Letzte Antwort: vor 17 Jahren, 1 Monat, 19 Tagen, 7 Stunden, 12 Minuten
  • Alle Beiträge und Antworten zu "chinesisch"

    Re: chinesisch

    Anonymous - 28.02.2007, 16:17

    chinesisch
    program chinesisch;

    {$APPTYPE CONSOLE}

    uses
    SysUtils;
    var text:string;

    function hans(satz:string):string;
    var i:integer;
    begin
    i:=1;
    while i<length(satz) do begin
    if satz[i]='e' then satz[i]:='i';
    if satz[i]='a' then satz[i]:='i';
    if satz[i]='r' then satz[i]:='l';
    inc(i);
    end;

    result:=satz;
    end;

    begin
    text:=hans('Drei Chinesen mit dem Kontrabass');
    writeln(text);
    readln;
    end.



    Mit folgendem Code, können Sie den Beitrag ganz bequem auf ihrer Homepage verlinken



    Weitere Beiträge aus dem Forum Inlandish Forum

    Die Christmas Songs - gepostet von JS am Montag 03.04.2006
    Weihnachten 2005-Seid ihr zufrieden? - gepostet von Henny am Sonntag 25.12.2005
    Umfrage zum Livekommentar - gepostet von Päddy am Mittwoch 25.01.2006



    Ähnliche Beiträge wie "chinesisch"

    1.9.: Chinesisch essen - administrator (Dienstag 31.08.2004)
    Namen auf Chinesisch - verry* (Mittwoch 30.01.2008)
    Morn (18.10.05) chinesisch essa - Hadi (Montag 17.10.2005)
    Chinesisch - chrisi (Dienstag 27.12.2005)
    Chinesisch - Einstein (Samstag 18.03.2006)
    Pics von chinesisch Essen!! - Wolf2000 (Donnerstag 18.05.2006)
    Chinesisch Essen - fillip (Freitag 11.08.2006)
    Willkommen auf unserer Chinesisch-Website - ruifa (Montag 08.01.2007)
    Karpfen chinesisch - sundream (Donnerstag 25.01.2007)
    Suche Tandem-Partner Deutsch-Chinesisch - Anonymous (Montag 26.03.2007)