Hi! Also mit Info hab ichs nich so, gerade in turbo pascal. Also wir sind grad so beim programmieren mit unterprogrammen (prozeduren) und meiner lehrnutte fällt so ein sie könnt ja noch ne homework auf zensur aufgeben - crass wenn jemand in meinem kurs die ganze sache mal verstehen würde ...

Also die Aufgabe heisst ein Struktogramm zu entwerfen, an sich leicht, hab schon viele gemacht aber jetzt mit den unterprogrammen

Aufgabe
Es soll der dreimalige Wurf mit einem Würfel simuliert werden, dabei sind die Seiten 1,2 und 3 schwarz; die Seiten 4 und 5 rot und die 6 ist gold. Es soll nun der Wurf in einer procedure verbaut werden. Anschließend soll das gewürfelte ausgegeben werden und unter 's' für scwarz, 'r' für rot und 'g' für gold gespeichert werden. Zum schluss soll die Anzahl der würfe ausgegeben werden (zähler notwendig) bei dem schwarz - rot - gold nacheinander auftraten (BSP. 1,4,6 gewürfelt).

HÄÄÄÄÄ???

wie gesagt ich brauch (erstmal) nur das Struktogramm, vielleicht gibts ja info freaks hier

danke im Vorraus

Also das Programm könnte ich schnell schreiben, aber ein Struktogramm ? Das ist für Weicheier, sowas mach ich net

cu
noway

lol ich hab seit 2 jahren dieses verhurte turbo pascal in info und ich hab noch nie was gecheckt. ich hasse diesen scheiß.. waa

hmm naja ich hab zwar kein Plan was nen Struktogramm ist

Aber einfach halt ne Procedure Würfeln machen


dann da ne for schleife 1 bis 3 (3 Würfe)
dann random zahl als würfelergebnis speichern (random 5 + 1 da von 0 gezählt wird..)
Dann machste nen case oder ne If bedingung, und speicherst jeweils den Wurf in nem Array oder sowas für Ergebnis Wurf 1 (char oder string, da du ja zeichen speichern musst).


Die Syntax kann ich dir leider so nicht geben, hab schon jahre kein pacsl mehr programmiert

So, ich habs jetzt. Hat ein bißchen länger gedauert, weil ich vergessen hab nen String zu initialisieren und ewig nach dem Fehler gesucht habe und weil ich ne ganze Weile Mittagessen war.

Was bietest du mir fürs Programm ?

Nee, scherz. Ist im Anhang, samt Source. In 5,31kb sind exe + Source gezippt, das waren noch Zeiten mit Turob Pascal

cu
noway

EDIT: Im Anhang unter diesem Post ist die Schriftfarbe die gleiche wie die Hintergrundfarbe, wenn ihrs markiert seht ihrs. Bitte ändern @Admins.

hi! also erstmal danke für die zahlreichen posts, also das programm programmiern (lOl) würde ich vielleicht auch noch hinbekomm, ich will ja keine 15 punkte aber 11 wärn cool so mir gehts halt nur ums struktogramm also ich hab irgendwie no plan wies gehn soll...

naja werd halt irgendwas hinbaun und meinen natürlichen junggeniecharme nutzen

Dann guck dir halt mein Programm an, vielleicht leuchtets dann ein ?!

.pas-Dateien kannst du mit Notepad oder Word öffnen, sind ganz einfache Textdateien, falls du zuhause kein TP hast.

cu
noway

Zitat

Original von noway
Dann guck dir halt mein Programm an, vielleicht leuchtets dann ein ?!

.pas-Dateien kannst du mit Notepad oder Word öffnen, sind ganz einfache Textdateien, falls du zuhause kein TP hast.

cu
noway

phatt respect - er hat ahnung!!!! das programm sieht schon geil aus

Zitat

Original von Tobi@NSR
phatt respect - er hat ahnung!!!! das programm sieht schon geil aus

Danke, aber sooo der mega Burner ist das Programm auch net.

cu
noway