Hi ihr Lieben!

Mein Infolehrer hat uns heute per Rundmail eine Testklausur geschickt, da wir nächsten Donnerstag ne richtige Klausur "programmieren". Ich (und nicht nur ich, im Grunde eigentlich alle aus meinem Kurs...) verstehs eigentlich nicht wirklich, vor allem, weil wir nichts "Handfestes" haben, also weder Aufschriebe, Bücher oder sonst etwas... Könnte mir jemand von euch mal bei der Klausur helfen? Ich brech mir heut schon fast einen ab, aber es klappt einfach nicht -.- Ich weiß nichtmal, was ich so alles brauche.

Zitat:

Unter folgenden Bedingungen zahlt ein Betrieb an seine Mitarbeiter eine Jahresendprämie: Beträgt das Betriebszugehörigkeit weniger als ein Jahr, wird keine Prämie gezahlt; beträgt sie mindestens ein Jahr aber weniger als 6 Jahre, erhält man 200 €. Bei einer Betriebszugehörigkeit von sechs oder mehr Jahren bekommt man 80 € dazu und für jedes geleistete Dienstjahr 20 €. Beträgt im letzteren Falle das Lebensalter 50 oder mehr Jahre, so wird nochmals eine Zulage von 50 € gezahlt. Erstellen Sie ein Delphi-Programm, das obige Aufgabe löst. Nach Eingabe der Betriebszugehörigkeit und der Alterskategorie wird mit dem Button „Prämie berechnen“ die Prämie berechnet und im Editfeld ausgegeben. Benutzen Sie die Einheit Euro!

Ich wäre euch wirklich sehr dankbar, wenn ihr mir helfen könntet!

Gestalte am Besten mal Deine Oberfläche nach den Anforderungen und dann überlegst Du Dir, wie Du die Prämie berechnest. Ist doch eigentlich nicht schwer, Du hast ein paar Bedingungen und 2 Variablen (im rechnerischen Sinne) und daraus berechnest Du die Prämie.

Hier wird Dir sicher keiner den Code geben, denn das würde Dir überhaupt nichts bringen.

Also erstmal im Forum

Erläutere uns doch bitte dein Konkretes problem. Verstehst du die Aufgabe von der Logik her nicht oder wie man das in der Informatik umsetzen kann

Moderiert von Narses: Vollständiges Zitat des 1. Beitrags entfernt.

Also WAS ich machen muss, ist mir klar, nur WIE ist das Problem...

bis jetzt sieht meine Oberfläche so aus:
- GroupBox1 "Betriebszugehörigkeit" mit Editfeld und Label für die Jahre
- GroupBox2 "Lebensalter" mit RadioButton1 und RadioButton2 für "unter 50 Jahre" sowie "50 Jahre und mehr"
- GroupBox3 "Prämie beträgt" mit Editfeld und Label für den Betrag
- Button1 "Prämie berechnen"
- Button2 "Löschen"
- Button3 "Ende"

Bin jetzt soweit, dass ich alles beschriftet habe.

Ich hab mir folgendes überlegt, bin mir aber nicht sicher, ob alles stimmt!
=> Edit1 (bei Betriebszugehörigkeit; ich habs "b" genannt) muss vom Typ integer sein
=> RadioButton1 und 2 sind Bool'sche Variablen
=> Prämie p errechnet sich aus b (entweder unter 1, zwischen 1 und 6 oder mehr als 6 Jahren) und dem Alter.

Das sind bis jetzt meine kläglichen Anfänge... Jetzt bräuchte ich was, damit ich auf die Prämien komme. Um auf den Betrag zu kommen, brauch ich if-then-else, aber ich komm ja nicht mal darauf, wie ich das aufschreiben könnte mit der Berechnung der Prämie...
hab mir mal fürs Einfachste das hier überlegt:

if b<1 then
p:=0

Stimmt das schonmal? ^^

Moderiert von Narses: --- Beiträge zusammengefasst ---

Oder könnte ich das auch mit Arrays hinbekommen?

ich hab die Betriebszugehörigkeit b jetzt als real statt integer eingetragen.

var b: array [0...0,9] of real;

for b:=0 to 0,9 do p := 0


Scheint mir alles seeeeeeehr undurchsichtig ^^

steffvieh hat folgendes geschrieben:

Oder könnte ich das auch mit Arrays hinbekommen? ich hab die Betriebszugehörigkeit b jetzt als real statt integer eingetragen. var b: array [0...0,9] of real; for b:=0 to 0,9 do p := 0 Scheint mir alles seeeeeeehr undurchsichtig ^^

Ich würde mich wunder wenn das so Compilierbar ist Array[0...0,9] was willst du damit erreichen, was soll das darstellen. Kann natürlich auch sein das das eine Array form ist die ich mir nicht anngeschaut hab.

Ich denke Ihr sollt mir logischen Verknüpfungen arbeiten ( or and) und Operatoren (>,<,<>,etc.)
Außerdem ist das mit betriebszugehörigkeit boolean quatsch würde ich sagen.

Gehen wir die Aufgabe mal durch

Wir nehmen eine Prämie vom typ praemie: Single;(Gleitkommat)
Außerdem brauchen wir die Betriebszugehörigkeit in Jahren: years: Byte(0...255 Ganzzahle)
und alter auch byte

Beträgt das Betriebszugehörigkeit weniger als ein Jahr, wird keine Prämie gezahlt;

beträgt sie mindestens ein Jahr aber weniger als 6 Jahre, erhält man 200 €.

Bei einer Betriebszugehörigkeit von sechs oder mehr Jahren bekommt man 80 € dazu und für jedes geleistete Dienstjahr 20 €.

Beträgt im letzteren Falle das Lebensalter 50 oder mehr Jahre, so wird nochmals eine Zulage von 50 € gezahlt.

habe ich mal kurz hingekritzelt und geschmiert also nicht bei flüchtigkeitfehlern meckern bitte aber daher solltest du das ableiten können. Lass die Array da raus die haben da nichts zu suchen mfg herr Bananerama

oh o.O Danke!

Sieht ja irgendwie ganz einfach aus... Was ich aber nicht verstanden hab, ist das mit "Byte"... was hat denn das zu bedeuten? Habs ja im Quellcode auch nicht wiedergefunden ^^

steffvieh hat folgendes geschrieben:

oh o.O Danke! Sieht ja irgendwie ganz einfach aus... Was ich aber nicht verstanden hab, ist das mit "Byte"... was hat denn das zu bedeuten? Habs ja im Quellcode auch nicht wiedergefunden ^^

Das ist der Datentytp den ich vorschlage. Kannst natürlich auch Integer nehmen aber:
integer verbraucht 4 bytes
der datenty byte ein byte. Daher der Nahme Byte

Ich würde die Variablen lokal deklarieren (in Button1) Die Panels kannste bei seite lassen aber du solltest dir noch ein par testaufgaben machen. Im Prinzip ist das was ihr macht super mega einfach man muss halt nur die richtigen ausdrücke kennen.


bei der arbeit nicht vergessen zu kommentieren und einzurücken Viel glück

Ja, ich seh schon, dass das einfach sein soll, für euch einfach ist ^^ Das Problem ist einfach, dass unser Lehrer es ja selber nicht versteht... Neulich hatten wir eine Aufgabe, in der man Euro und Dollar in die jeweils andere Währung umrechnen lassen können sollte, aber was man dagegen tun kann, dass man zwei Kommas in eine Zeile schreiben kann, weiß er auch nicht -.- (also wir hatten zum Teil solche Zahlen zum Umrechnen: 9,07,3...)

Nochmal zurück zu der Aufgabe:
wo soll ich das alles jetzt reinschreiben? Wenn ich einen Doppelklick aufs Editfeld bei der Betriebszugehörigkeit mach, beim Button "Prämie berechnen", beim Editfeld "Prämie" oder was?!


Hab jetzt grad noch ne Mail von meinem Lehrer bekommen:

Zitat:

Hallo, hier ein Tipp für die Lösung: ------------------- procedure TForm1.Button1Click(Sender: TxObject); var bez, p: integer; begin bez := StrToInt(Edit1.Text); if bez < 1 then p := 0 else begin p := 200; if bez>= 6 then begin p := p + 80 + bez * 20; //Falls Lebensalter >= 50 if RadioButton2.Checked then p := p + 50; end; end; Edit2.Text := IntToStr(p); end; --------------------

BITTE WAS?! Was ist denn bitte StrToInt?! Mit sowas haben wir ja noch NIE gearbeitet!! Der Mann macht mich wahnsinnig -__-

Ehrlich gesagt: euer Lehrer erwartet von euch einfach nur, dass ihr etwas mitdenkt und selbständig handelt. Es gibt zum Beispiel in Delphi einen Hilfebutton. Das ist doch das erste, daß man mal in die Hilfe zum Programm schaut!

Zitat:

Ja, ich seh schon, dass das einfach sein soll, für euch einfach ist ^^ Das Problem ist einfach, dass unser Lehrer es ja selber nicht versteht... Neulich hatten wir eine Aufgabe, in der man Euro und Dollar in die jeweils andere Währung umrechnen lassen können sollte, aber was man dagegen tun kann, dass man zwei Kommas in eine Zeile schreiben kann, weiß er auch nicht -.- (also wir hatten zum Teil solche Zahlen zum Umrechnen: 9,07,3...)

Wenn ihr die Zahlen hier nicht gerade aus einer typisierten Datei ausgelesen habt, dann habt ihr hier wahrscheinlich eh schon so was wie 'Val' oder 'StrToFloat' benutzt. Nun müßt ihr das halt auf Editfelder mit ganzzahligen Werten übertragen.

Grüße,
Uli

Hi
Nun ja, da frag ich mich doch, wem da was aufgefallen ist ? 1 bis 6 Jahre = 200 €, darüber 80 € Grundprämie+ 20 € pro Jahr....
also, 6 *20 =120 + 80 = 200 ! und damit kann man schon ein wenig vereinfachen.

Ok, nun hast du mal 6 Zeilen, die gut und gern deine Aufgabe lösen. Dazu brauchst du deine gestaltete Form und das notwendige Umfeld...
Eine Bemerkung: Die Aufgabe erscheint dir schwer, weil du den verwendbaren Algorythmus nicht erkennst. Dies ist aber Voraussetzung für Programme. Es hätte dich stutzig machen müssen, warum alle bis 6 Jahre 200 € und diejenigen, die länger da sind, einen niedriegeren Grundbetrag erhalten. Zumindest bei der Berechnung, was kommt denn dabei heraus, wäre dir aufgefallen, das 200 € der Mindestbetrag ist und damit die Prämie sich ganz einfach aus den Jahren berechnen und nach unten mit 200 € abgegrenzt ist.
Es ist wichtig, die Aufgabe zu verstehen, der Programmcode läßt sich dann ganz einfach zusammenstellen. Zur Not greift die Hilfe oder die vielen mitgelieferten Beispiele. Als ich die ersten Programmierkurse belegte, sagte man mir, programmiert wird erst mal auf Papier. Nun ja, damals zählte auch jedes Byte..... und Rechnerzeit war teuer. Aber diese Vorgehensweise erzog automatisch zum Denken, da man ja nicht laufend neue Blöcke kaufen wollte. So hoffe ich, euch ein paar hilfreiche Tipps gegeben zu haben.
Gruß oldmax

steffvieh hat folgendes geschrieben:

Ja, ich seh schon, dass das einfach sein soll, für euch einfach ist ^^ Das Problem ist einfach, dass unser Lehrer es ja selber nicht versteht... Neulich hatten wir eine Aufgabe, in der man Euro und Dollar in die jeweils andere Währung umrechnen lassen können sollte, aber was man dagegen tun kann, dass man zwei Kommas in eine Zeile schreiben kann, weiß er auch nicht -.- (also wir hatten zum Teil solche Zahlen zum Umrechnen: 9,07,3...) Nochmal zurück zu der Aufgabe: wo soll ich das alles jetzt reinschreiben? Wenn ich einen Doppelklick aufs Editfeld bei der Betriebszugehörigkeit mach, beim Button "Prämie berechnen", beim Editfeld "Prämie" oder was?! Hab jetzt grad noch ne Mail von meinem Lehrer bekommen: Zitat: Hallo, hier ein Tipp für die Lösung: ------------------- procedure TForm1.Button1Click(Sender: TxObject); var bez, p: integer; begin bez := StrToInt(Edit1.Text); if bez < 1 then p := 0 else begin p := 200; if bez>= 6 then begin p := p + 80 + bez * 20; //Falls Lebensalter >= 50 if RadioButton2.Checked then p := p + 50; end; end; Edit2.Text := IntToStr(p); end; -------------------- BITTE WAS?! Was ist denn bitte StrToInt?! Mit sowas haben wir ja noch NIE gearbeitet!! Der Mann macht mich wahnsinnig -__-

hier gibt es übrigens auch delphi tags

also ich sehe ihr habt noch nicht besonders viel gemacht. Deswegen gib ich dir mal eine kurze beschreibung wie man eine Aufgabe derart rangeht. Außerdem kann man übrigens edit von dem deutschen wort Editierfeld ableiten. Also etwas wo man einen text reinschreiben kann. Delphi ist halt auch nur eine sprache . Also in diese Editierfelder, welche übrigens Objekte sind, schreibt der Endbenutzer die Daten rein. Normalerweise würde man dann nachher das ergebnis in ein Label schreib, welches du unter den Standart komponenten findest(kleiner tip: F1 ). Diese Editierfelder haben einen text. Das ist das was man da rein schreibt. Da es aber ein text ist und du mit dem Datentyp Single/Integer arbeiiten willst musst du diesen noch umwandel. Das machst du mit StrToInt/InToStr. Auch hier kannst du wieder ableiten. String(zeichenkette)to(zu)Integer(Ganzzahl).


Wie geht man nun aber an solch eine Aufgabe ran. Also man beginnt damit sich die Aufgabe so oft durchzulesen bis man sie verstanden hat. Dann beginnt man die Gui zu gestalten und schließlich überlegt man sich bevor man anfängt wie man das am besten umsetzt. Hier die Stichpunkte an die man sich hier halten muss und was auch in deiner arbeit vorkommen wird:

-logische verknüpfungen(and,or)
- Variablen(Datentyp, wo deklarieren, was machen diese)
- if ... then else Anweisungen
- Zuweisungen (:=)
- operatoren (<,> ...)

oldmax hat folgendes geschrieben:

Es hätte dich stutzig machen müssen, warum alle bis 6 Jahre 200 € und diejenigen, die länger da sind, einen niedriegeren Grundbetrag erhalten. Zumindest bei der Berechnung, was kommt denn dabei heraus, wäre dir aufgefallen, das 200 € der Mindestbetrag ist und damit die Prämie sich ganz einfach aus den Jahren berechnen und nach unten mit 200 € abgegrenzt ist.

Bist du dir da sicher?

steffvieh hat folgendes geschrieben:

Zitat: Bei einer Betriebszugehörigkeit von sechs oder mehr Jahren bekommt man 80 € dazu und für jedes geleistete Dienstjahr 20 €.

Heißt für mich so viel wie, dass es insgesamt 280 + 20*Dienstjahre gibt... oder verstehe ich da jetzt was falsch?!

Daher von mir noch ein Tipp dazu: die Lösung furchtbar ordentlich detailliert kommentieren, insbesondere, wenn du denkst, dass man eine Aufgabenstellung unterschiedlich deuten kann... dann schreib halt dazu "Ich habe das so-und-so verstanden und setze es daher so-und-so um" Die Wahrscheinlichkeit, dass man dir dann Punkte abzieht ist deutlich geringer, weil du zeigst, dass du über die Aufgabe nachgedacht hast!

Hi
Sorry, gut zu wissen, das andere gründlicher lesen. Aber wenn die Aufgabe schon verstanden, ist's ein leichtes, meine 6 Zeilen anzupassen:


Seht es meinem Alter nach, wenn ich aus
< bekommt man 80 € dazu und für
sowas lese
< bekommt man 80 € und dazu für >
Nun ja, brauch ja auch keine Schularbeiten mehr machen.....
Gruß oldmax

Guten Morgen bzw.guten Vormittag

Also erstmal Danke für eure Antworten!

uko hat folgendes geschrieben:

Ehrlich gesagt: euer Lehrer erwartet von euch einfach nur, dass ihr etwas mitdenkt und selbständig handelt. Es gibt zum Beispiel in Delphi einen Hilfebutton. Das ist doch das erste, daß man mal in die Hilfe zum Programm schaut!

Da gibts ja leider nur ein Problem: Wir dürfen die Hilfe nicht benutzen... Unsere Klausurbedingungen sehen so aus: Wir werden erst in den Computerraum gelassen, wenn unser Lehrer komplett alle Tische nach irgendwelchen Hilfen durchsucht hat. Die PCs sind dann schon hochgefahren, allerdings nicht mit unserem Benutzerkonto sondern extra mit einem für Klausuren erstelltem Konto. Vom Internet sind wir sowieso abgeschnitten, wir haben keinen Zugriff auf unsere schon erstellten Projekte und da wir nur 7 Leute im Kurs sind, schaut er uns mit MasterEye auch die ganze Zeit zu. Der würd also gleich bemerken, wenn wir uns irgendwo Hilfe holen würden. Noch dazu kommt, dass wir nichts mit in den Raum nehmen dürfen, auch kein Stück Papier, auf dem wir uns vor der eigentlichen Arbeit mal kurz Notizen machen könnten...
Ehrlich gesagt find ich das alles etwas übertrieben, vor allem, weil wir seit Schuljahresbeginn (September) ganze 6 Mal erst Informatik hatten...


Ich probier jetzt schon die ganze Zeit um, aber irgendwie hab ich total dämliche Fehler drin und ich weiß nicht, wo sie sind... Habt ihr das Programm mal erstellt? Für euch wars wohl ziemlich einfach ^^


steffvieh

Vielleicht hilft dir der Crashkurs von Christian S. ja ein wenig weiter, um grundlegende Sachen zu verstehen. Schau ihn dir einfach mal an, wenn du das in Teilen verstehst, dürftest du mit der Klausur eigentlich keine großen Schwierigkeiten haben... Ich drück dir jedenfalls die Daumen!

Hab ich schon durchgelesen, aber irgendwie hilfts mir trotzdem nicht... Was nicht heißen soll, dass es nicht gut ist, ich bin wohl eher zu dämlich für Informatik -.-

Wie schaff ichs endlich, dass endlich die Prämienhöhe in Edit2 erscheint?! Das Programm läuft soweit, aber ich kann tippen und tippen und nix verändert sich...

@steffview: ich glaub jetzt mal kaum, daaß euer Lehrer die Online-Hilfe (das Ding, das erscheint, wenn man in Delphi F1 drückt) von Delphi deaktiviert.

Aber zu deiner letzten Frage: Du mußt das Ergbnis deiner Berechnung auch dem Edit2-Feld zuweisen:

Machst Du das in deinem Code?

grüße,
Uli

Ja, aber ich schätz mal, dass ichs falsch eingeordnet hab...

So sieht grad mein Quelltext aus:




Wo liegt denn da der Fehler?

EDIT: Ich habs jetzt! Also jetzt kommt endlich ne Zahl bei der Prämie! War das ne Geburt ^^ Jetzt fehlt mir nur noch der Rest
Problem ist jetzt: egal, was ich eintippe oder was ich anklicke, kommt bei Prämie: "1243048"

Moderiert von UGrohne: Delphi-Tags hinzugefügt.

Sieht so aus, als wenn Du kurz vor Klausur anfängst Dich mit allgemeinen Fragen der Programmierung zu beschäftigen.

Hinweise sind ja nun schon genug gegeben, aber eine Kleinigkeit noch von mir:

"If ..RadioButton.Checked" ist doch eine Boolsche Abfrage und verlangt auch eine solche Entscheidung also True oder False.

Hab ich schon geändert

Auch wenns so aussieht, als hätt ich erst jetzt angefangen: so ist es nicht. Ich hab mir schon die Sachen angeschaut, aber in der Theorie ist das alles halt doch ganz einfach im Gegensatz zur Praxis... Ich brauch bei sowas eh immer länger. Ich hab erst letzten Montag das Programm bekommen, weil wirs nicht auf die Reihe bekommen haben, noch vor den Ferien die CD rumgehen zu lassen... Dann war das Ding auch noch so beschädigt, dass mein Freund Isobuster drüberlaufen lassen musste.