Mensch-ärgere-dich-nicht in Pseudocode?

Hallo Community. Ich schreibe demnächst eine Informatik-Klausur und habe als Übungsaufgabe unter anderem folgende Aufgabe bekommen:

Beschreiben Sie in Pseudocode den Vorgang des ersten Würfelns beim Mensch ärgere dich nicht, also vor dem ersten Raussetzen bis zum Ende des ersten Zuges! Nutzen Sie die Befehle: - würfeln (gibt eine Zahl zwischen 1 und 6 zurück), - raussetzen, - rücken(n) (verlangt als Parameter die Anzahl der Felder um die gerückt wird - weitergeben (wenn der eigene Spielzug beendet ist) sowie die aus Pascal bekannten Schlüsselwörter für Programmstrukturen (begin, end, if ... then ... else ... usw.)! Verwenden Sie die Variablen AZ für die aktuelle Augenzahl und i für die Nummer des Wurfes.

_________________________________________________________

Wir haben sowas ähnliches schonmal im Unterricht gemacht, ich habe aber wieder vergessen wie das nochmal ging. Kann mir jemand helfen?

(Ich erwarte nicht, dass mir jemand diese Aufgabe komplett löst, ich hoffe, dass mir jemand Lösungsansätze geben kann.)

Danke :)

3 Antworten

Vom Fragesteller als hilfreich ausgezeichnet

qugart

Von gutefrage auf Grund seines Wissens auf einem Fachgebiet ausgezeichneter Nutzer

Computer

14.11.2017, 15:44

Naja....du brauchst halt eine Schleife, die dreimal ausgeführt wird (i=3). Die Schleife wird unterbrochen, wenn AZ=6.

CreeperNicol

Fragesteller

14.11.2017, 16:00

also in etwa so?:

begin;

repeat

az:=zufall az;

until i=3 or az=6;

if i=3 then ‘weitergeben’ else ‘rausrücken’;

end;

end.

qugart

14.11.2017, 16:17

@CreeperNicol

So in etwa.

CreeperNicol

Fragesteller

14.11.2017, 16:37

@qugart

okay. hab es nochmal etwas ausgebaut.

begin

i=1 -> repeat

AZ:=wuerfeln;

i:= i+1

until (AZ=6) or (i=3)

if AZ=6 then begin

raussetzen

AZ:=wuerfeln; repeat

ruecken (AZ); until AZ<>6

end;

else
weitergeben

end;

verreisterNutzer

14.11.2017, 15:44

Wenn du weist, wie man würfelt -- dann steht doch alles in der Aufgabenbeschreibung ,,,,

CreeperNicol

Fragesteller

14.11.2017, 15:54

Doch. Aber ich stehe grade etwas aufm Schlauch. Tut mir leid.... Sonst würde ich ja nicht fragen

oxbox

14.11.2017, 15:47

und wo ist nun dein problem?

das du nicht weist wie man Mensch ärger dich nicht spielt?!

Du sollst ja keinen echten code erstellen...

zb:

Würfel.würfel(wucht:double):integer ;

Nimm das Object Würfel und starte die methode würfel, welche in meinem beispiel einen Übergabeparameter hat nämlich die wuchtung des wurfes..

Ähnliche Fragen

Erwartungswert berechnen Excel?

Hallo,
ich hab hier eine Aufgabe die ich nur zum Teil hinbekommen habe .Die Aufgabe lautet: Ein fairer Würfel wird zweimal geworfen. Sei X die Augenzahl des ersten Wurfes und Y die Augenzahl des zweiten Wurfes. Berechnen Sie:
a) E(| X-Y |)
b) Überprüfen sie das Ergebnis für den Erwartungswert durch Simulationen in Excel.

Die Aufgabe a) habe ich hinbekommen und habe als erwartungswert 35/18 raus. Jedoch kenne ich mich nicht so gut mit excel aus, um die Aufgabe b) zu lösen.
Könnte einer mir behilflich sein. Ich würde mich sehr freuen.

Danke im Voraus:)

...zur Frage

Tetraeder Mathe Aufgabe?

Ich benötige dringend Hilfe bei einer Mathe Aufgabe. Die Aufgabe richtet sich an Tetraeder Würfel (Zur Info: Es ist ein Dreieckiger Würfel). Die Aufgabe lautet:
Das Ergebnis eines Wurfes mit zwei Tetraedern ist die Differenz der Augenzahlen. Hierbei gilt stets: größere minus kleinere Augenzahl. Stelle die möglichen Ergebnisse strukturiert dar und gib an, welche Differenzen die größte Wahrscheinlichkeit hat.

...zur Frage

Lazarus Package aus .pas dateien erstellen?

Ich habe ein Lazarus Pkg heruntergeladen aber wie so häufig ist da drin keine fertige .lpk datei die man einfach installieren könnte sondern man muss die pas dateien selber in ein Package kompilieren welches man dann installiert das ist mir klar. Aber wie mache ich das? Kann mir einer helfen?

...zur Frage

Wie löse ich diese Wahrscheinlichkeitsaufgabe mit den Würfeln?

Hey Leute!

Wie gehe ich bei dieser Aufgabe vor?

Man wirft 3 sechsseitige Würfel. Wie groß ist die Wahrscheinlichkeit, dass die Augenzahl des ersten Würfels größer oder gleich ist als die Augensumme der beiden anderen?

Danke!

...zur Frage

Mensch-ärgere-dich-nicht Spielregeln? Nochmal würfeln, wenn man bei 6 nicht ziehen kann?

Hallo Community, Ich hoffe ihr könnt mir weiterhelfen. Ich habe beim googeln im Internet leider keine Regel zu meiner Frage gefunden. Wenn man bei Mensch ärgere dich nicht, nur noch ein Spielstein auf dem Feld hat . Und kurz vor Zieleinlauf eine Sechs würfelt, man aber eine 5 bräuchte genau ins Ziel einzulaufen (bei 6 steht schon ein Stein im Ziel), darf man dann, obwohl man nicht ziehen konnte, weil die Augenzahl zu hoch war noch mal würfeln oder ist der nächste Spieler an der an der Reihe?

(In der Regel darf man ja bei 6 noch mal würfeln) aber wenn man nicht 6 ziehen kann (weil man eine 5 bräuchte) auch?

...zur Frage

Zwei Delphi Formulare verbinden

Hallo,

Ich habe eine Frage bzgl. wie man zwei Delphi Formulare/Unit miteinander verbindet. Als Compiler verwende ich Lazarus.

Mein Problem ist aber nicht das eigentliche Einbinden, ich habe einfach Unit2 in der Uses-Klausel hinzugefügt und das hat eigentlich auch funktioniert, ich konnte also mit einem Button über Form2.Show dieses anzeigen lassen. Ich brauche in meinem Programm aber auch so etwas wie einen Home-Button. Also wieder Form1.Show, habe ich gedacht, hat aber nicht funktioniert. Was genau mache ich falsch. ich habe auch Unit1 in die Uses Klausel eingefügt, hat jedoch nichts verändert.

Ich hoffe, hier kann mir das jemand erklären, für mich ist es nämlich komplett unverständlich...

Danke schonmal im Vorraus!!!

Lg.

...zur Frage

Lazarus Exponent Rechner Problem

Hay,

Ich hab ein Programm geschrieben zum üben für die Schule aber ich hab ein Fehler keine Ahnung wo hab schon die ganze zeit gesucht aber finde nichts....

Hier ein Bild: http://i.epvpimg.com/I0xie.png

Wenn ich zum Beispiel eine Zahl nehme "2" dann mit dem Exponenten "1" nehmen will.... kommt da 4 heraus obwohl da 2 kommen muss irgendwas ist falsch aber ich bin zu dumm um es zu finden ^^

bitte helfen dankeeeee bekommt auch ein stern

...zur Frage

Lazarus Counter einbauen. Wie geht das?

Hallo, ich habe in lazarus in ein Textfeld einen Satz eingegeben. Nun will ich mit einem einfachen Zähler herrausfinden wie viele "u" in diesem Satz stehen. Aber wie stelle ich das an?

...zur Frage

Lazarus: Objekte aus Form1 in Form 2 verändern?

Hallo Leute, ich versuche mit einer Form1 per Click einen Button in der Form2 verschwinden zu lassen. Ich habe nur das Problem, dass ich aus einem Grund die Fehlermeldung :"sigsegv" angezeigt bekomme.

Ich würde mich sehr freuen wenn jemand mir einen Tipp geben könnte wie man dies umsetzen könnte.

Beste Grüße

...zur Frage

Wann StrToFloat oder FloatToStr (oder StrToInt,…) benutzen?

Beim programmieren mit Delphi in Lazarus stelle ich mir (als absoluter Beginner beim Thema programmieren) die Frage, was String und Float genau bedeutet und wann ich StrToFloat und FloatToStr benutzen muss. Ich habe gegoogelt und da stand, String sei eine Zeichenfolge. Was ist eine Zeichenfolge?

Außerdem, was ist Integer und wann brauche ich das (StrToInt, und gibt es auch IntToStr?)? Mache grade einen Programmier Kurs in dem wir mit Delphi bei Lazarus beginnen. Leider wird in dem Kurs vorausgesetzt das ich mir solche Dinge schon merken kann, aber ich bin da nicht so flott.

Ich brauch Antworten in möglichst einfacher Sprache, die Fachsprache kenne ich noch nicht und kann deshalb mit sämtlichen Foren in denen sich Programmierer darüber unterhalten nichts anfangen.

...zur Frage

Ein Bild in Parabelform bewegen (Lazarus)?

Hey,
ich würde gerne eine Sonne über das Programm bewegen in einer Kurve. Nur habe ich keine Ahnung wie ich das Bild in einer Kurve bewege.

...zur Frage

Wieso funktioniert der Code in Lazarus nicht?

Hallo, ich lerne gerade ein wenig mit Lazarus zu programmieren.

Ich möchte dabei Hotkeys programmieren, die man außerhalb von der TForm nutzen kann. Leider funktioniert das bei meinem Programm nicht, aber ich weiß nicht, was das Problem ist.

Code:

unit unit1;
{$mode objfpc}{$H+}
interface
uses
  Classes, SysUtils, Forms, Controls, Graphics, Dialogs, LCLType, Windows;
type
  { TForm1 }
  TForm1 = class(TForm)
  procedure FormCreate(Sender: TObject);
  procedure FormDestroy(Sender: TObject);
  procedure FormKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState);
  private
    { Private declarations }
  public
    { Public declarations }
end;

var
  Form1: TForm1;
  HotkeyRegistered: Boolean;

implementation
{$R *.lfm}

procedure TForm1.FormCreate(Sender: TObject);
begin
  HotkeyRegistered := False;
  RegisterHotKey(Handle, 1, MOD_CONTROL or MOD_SHIFT, VK_NUMPAD1);
end;

procedure TForm1.FormDestroy(Sender: TObject);
begin
  if HotkeyRegistered then
    UnRegisterHotKey(Handle, 1);
end;

procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
  if (ssCtrl in Shift) and (ssShift in Shift) and (Key = VK_NUMPAD1) then
  begin
    ShowMessage('Hotkey wurde gedrückt!');
  end;
end;

end.

Weiß jemand, woran das liegt?

...zur Frage

Lazarus bzw. Programmiersprache "Pascal" problem beim erstellen eines Taschenrechners?

Hallo.

Ich bin gerade dabei einen Taschenrechner auf Lazarus mit der Programmiersprache Pascal zu programmieren.
Dennoch hab ich bei einer Sache ein Problem (bin noch Anfänger in diesem Bereich).
Und zwar schaffe ich es nicht, dass es ausgerechnet wird.
Also ich hab es erstmal mit einem label probiert.
Da schaff ich (komisch gesagt) nicht die opperatoren (+,-,*,/) von den Zahlen zu "Filtern".
Also so dass erkannt wird was davon die zahl ist und was der opperator damit das automatisch ausgerechnet wird.

2.Variante ist, ich hab 3 edits. Ein Edit für die erste zahl und eins für die zweite und eins für den opperator aber da hab ich das problem mit der virtuellen tastatur (welche dabei sein muss), da ich nicht weiß wie man da einstellt (auch nicht vom nachdenken her) dass man in das 2. edit feld schreibt wenn man die 2.zahl schreiben will. z.b. dass sobald man auf die edit fenster klickt, dass dann jede zahl die eingegeben wird nur da angezeigt wird.

Hoffe es ist einigermaßen verständlich.

Kurze zusammenfassung:
1. wie bringt man einen Taschenrechner mit Lazarus mit nur einem label wo alles reinkommt zum rechnen
2.Wie macht man es so, dass bei einer virtuellen tastatur, sobald man auf ein edit fenster klickt , alles was man klickt in dem ausgewählten edit fenster landet?

danke im Vorraus

...zur Frage

Mensch-ärgere-dich-nicht Matheaufgabe Hilfe?

Ich sitze schon etwas länger an drei Matheaufgaben, eine davon sieht so aus:

Beim Mensch-ärgere-dich-nicht darf man zu Spielbeginn erst dann einsetzen, wenn man eine sechs würfelt, wobei man maximal drei Versuche hat.
Ansonsten muss man eine Spielrunden warten.

Wie viele Spielrunden muss man im Durchschnitt warten, bis man zum ersten Mal einsetzen kann?

Simulieren Sie den Vorgang auf zwei Arten: a) durch wiederholtes Würfelwerfen. B) mit Zufallsziffern durch eine Serie von Dreier-Blöcken der Ziffern 1 bis 6. n = 10

Puhh, was eine ellenlange Aufgabe.

Ich verstehe hier allerdings gar nichts, kann mir das irgendjemand erklären?

...zur Frage

Was möchtest Du wissen?

Deine Frage stellen