Entwickler-Ecke
Sonstiges (Delphi) - Kindergeld
Hartzer - Fr 03.12.10 17:14
Titel: Kindergeld
Hi Leute, ich bräuchte ein Programm, mit dem man das Kindergeld berechnen kann, wenn man
für die ersten beiden Kinder jeweils 184 euro bekommt,
für das dritte kind 190
und für jedes weitere kind 215 euro bekommt.
damitsoll das kindergeld bei einer beliebig hohen kinderanzahl berechnet werden.
Davon bräucht ich bitte einen quelltext
danke ;-) Paul
Moderiert von 
Narses: Topic aus Delphi Language (Object-Pascal) / CLX verschoben am Fr 03.12.2010 um 16:17
jaenicke - Fr 03.12.10 17:18
Hallo und :welcome:
Und was ist jetzt die Frage oder das Problem? :gruebel:
Wenn jemand dir einen fertigen Quelltext schreiben soll, ist das ein Fall für die Jobbörse, nicht für das normale Forum.
Hobby-Programmierer - Fr 03.12.10 17:19
Dann schreib das doch schnell selbst :zwinker:
Hartzer - Fr 03.12.10 17:24
Leider weis ich garnicht wie das geht, aber ich bräuchte es einfach weil wir das als HA aufhatten, habe jedoch echt keine zeit für informatik weil ich in den nächsten 3 tagen 3 arbeiten schreibe.
bitte um verständnis danke ;)
Hobby-Programmierer - Fr 03.12.10 17:27
Symbolisch:
Delphi-Quelltext
1:
2:
3:
4:
5:
| for Menge:= 1 to Max_Kids do begin
wenn Menge < 3 dann Kohle:= Kohle + 184 €;
wenn Menge = 3 dann Kohle:= Kohle + 190 €;
wenn Menge > 3 dann Kohle:= Kohle + 215 €;
end; |
Gausi - Fr 03.12.10 17:29
Ich werf einfach mal sowas in die Runde, damit sollte sich was anfangen lassen
Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
| case AnzahlKinder of
0: Kindergeld := 0;
1: Kindergeld := etwas_mehr;
2: ...
3: ...
else
Kindergeld := ganz_viel;
end; |
jaenicke - Fr 03.12.10 17:30
Hartzer hat folgendes geschrieben  : |
| Leider weis ich garnicht wie das geht, aber ich bräuchte es einfach weil wir das als HA aufhatten, habe jedoch echt keine zeit für informatik weil ich in den nächsten 3 tagen 3 arbeiten schreibe. |
Dann sag das eben dem Lehrer, wenn du etwas nicht verstehst... :roll:
Hobby-Programmierer - Fr 03.12.10 17:33
| jaenicke hat folgendes geschrieben : |
| Hartzer hat folgendes geschrieben : | | Leider weis ich garnicht wie das geht, aber ich bräuchte es einfach weil wir das als HA aufhatten, habe jedoch echt keine zeit für informatik weil ich in den nächsten 3 tagen 3 arbeiten schreibe. |
Dann sag das eben dem Lehrer, wenn du etwas nicht verstehst... :roll: |
... oder einfach mal auf einem Blatt Papier aufschreiben und überlegen wie man 'mathematisch' da rangehen würde.
Ich verstehe aber auch net warum immer so hochkomplexe Themen in Info als Hausi aufgegeben werden. :mrgreen:
Bergmann89 - Fr 03.12.10 18:45
Hochkomplex :lol:
Ich dachte immer die 190€ gelten ab dem 3. Kind für jedes Kind, also 3*190€, oder bin ich da falsch informiert? Dann stimmt dein Code nämlich nicht, Hobby-Programmierer.
MfG Bergmann.
Hartzer - Fr 03.12.10 18:52
| Hobby-Programmierer hat folgendes geschrieben : |
| jaenicke hat folgendes geschrieben : | | Hartzer hat folgendes geschrieben : | | Leider weis ich garnicht wie das geht, aber ich bräuchte es einfach weil wir das als HA aufhatten, habe jedoch echt keine zeit für informatik weil ich in den nächsten 3 tagen 3 arbeiten schreibe. |
Dann sag das eben dem Lehrer, wenn du etwas nicht verstehst... :roll: |
... oder einfach mal auf einem Blatt Papier aufschreiben und überlegen wie man 'mathematisch' da rangehen würde.
Ich verstehe aber auch net warum immer so hochkomplexe Themen in Info als Hausi aufgegeben werden. :mrgreen: |
Wo du recht hast hast du recht.
Habs jetzt doch selbst gemacht und zwar so:
Delphi-Quelltext
1:
2:
3:
| if intedit1.value < 3 then intedit2.value:=intedit1.value*184;
if intedit1.value = 3 then intedit2.value:=intedit1.value*184+190;
if intedit1.value > 3 then intedit2.value:=558+(intedit1.value-3)*215; |
danke an alle ^^
mir is grad aufgefallen das das garnicht so wenig spaß macht :-)
Moderiert von Narses: Delphi-Tags hinzugefügt
platzwart - Fr 03.12.10 19:11
Delphi-Quelltext
1:
2:
3:
| if intedit1.value < 3 then intedit2.value:=intedit1.value*184;
if intedit1.value = 3 then intedit2.value:=intedit1.value*184+190;
if intedit1.value > 3 then intedit2.value:=558+(intedit1.value-3)*215; |
Diese Zeile ist mit Sicherheit falsch. Sonst bekommt man ja mit 3 Kindern 3 mal 184 plus nochmal 190 Euro Kindergeld :gruebel:
F34r0fTh3D4rk - Fr 03.12.10 20:08
Es sei denn, es handelt sich hier um die Anzahl der "Zusatzkinder" :wink:
Entwickler-Ecke.de based on phpBB
Copyright 2002 - 2011 by Tino Teuber, Copyright 2011 - 2026 by Christian Stelzmann Alle Rechte vorbehalten.
Alle Beiträge stammen von dritten Personen und dürfen geltendes Recht nicht verletzen.
Entwickler-Ecke und die zugehörigen Webseiten distanzieren sich ausdrücklich von Fremdinhalten jeglicher Art!