[Heidi]

ich bin nicht bayrin. nein. ganz sicher nicht.

[Flyingmatt]

Ooooh, wulle wulle @ Mättw.

Gut dass ich nich aus Bayern bin

[Schaf]

@ Xaver ich wollte halt auch andere an diesem Spiel teilnehmen lassen!

@ Joona: Den mit der Worscht-Semmel finde ich toll!

[Mäx Maxon]

Ok einen flachen hab ich auch

17 Thunfische warten vorm Kino - Warum geht keiner rein?

Der Film is erst ab 18.....


Cheers,

[Heidi]

@ mäx

[Kruhser]

Ok einen flachen hab ich auch

17 Thunfische warten vorm Kino - Warum geht keiner rein?

Der Film is erst ab 18.....


Cheers,

Sind Blondienen = THunfische? Ich kenn den nur mit Blondienen

[Joona]

Ich warte ja immer noch auf die TurboPascal-Variante ... kann das etwa keiner mehr?

[Schaf]

und ich warte auf das gemeckere über die schwedisch-version...

[SemtEX]

Sind Blondienen = THunfische? [...]

naja, vom geruch her... ähm.. THEMAWECHSEL!!!

Ich warte ja immer noch auf die TurboPascal-Variante ... kann das etwa keiner mehr?

ok, dann oute ich mich mal:

Code:

program thunfisch;

var  
  Ort : string = '';
  F1  : string = '';
  F2  : string = '';
  Pointe : boolean = False;
    
function treffen (F1, F2, Ort : string) : boolean;
begin
  Writeln('Treffen sich ein ' + F1 + ' und ein ' + F2 + ' ' + Ort);
  treffen := True;
end;

function poppen (F1, F2 : string) : boolean;
begin
  Writeln('Da poppt der ' + F2 + ' plötzlich den ' + F1 + ' (von hinten!?)');
  poppen := True;
end;

begin
  Ort := 'tief unten am Meeresboden';
  F1 := 'Walfisch';
  F2 := 'Thunfisch';

  repeat
    if treffen(F1, F2, Ort) = True then begin
      Writeln('*blubbediblubb*');
      if poppen(F1, F2) = True then begin
          Writeln('Walfisch: "Das darfst du nicht Thun, fisch!"');
          Writeln('Thunfisch: "Du hast keine Wal, fisch!"');
          Pointe := True;
      end
    end
  until Pointe = True;
    
    if Pointe = True then begin
      Writeln('(Man darf jetzt lachen!)');
    end
    
end.

(läuft sogar, falls noch jemand nen compiler dafür rumliegen hat...)

[Joona]

und ich warte auf das gemeckere über die schwedisch-version...

Heut is zu warm für Meckern