Autor Beitrag
Evanescence
Hält's aus hier
Beiträge: 10



BeitragVerfasst: Mi 08.02.06 19:07 
Ich hab hier ein Problem ich soll bis morgen einen *einfachen* Prozentrechner für die Schule machen... Hab aber irgendwie keinen Plan wie. Der Lehrer überspringt immer die Hälft.
Also so ist die Aufgabenstellung...

Wenn man einen Wert hat unter 100 € dann 10% Rabatt als Ausgabe
Wenn man einen Wert hat über 100 € dann 15% Rabatt als Ausgabe
und dann noch den zu zahlenden preis und die mehrwertsteuer 16%

Kann mir da jemand von euch helfen?
Sollte schon simpel sein..

Greetz
Nina
Gausi
ontopic starontopic starontopic starontopic starontopic starontopic starofftopic starofftopic star
Beiträge: 8554
Erhaltene Danke: 481

Windows 7, Windows 10
D7 PE, Delphi XE3 Prof, Delphi 10.3 CE
BeitragVerfasst: Mi 08.02.06 19:11 
Sowas?
ausblenden Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
function BerechneRabatt(aWert: Double):Double;
begin
  if Wert <= 100 then 
    Result := aWert/10
  else
    Result := aWert/15
end;

Function AddMWST(aWert: Double):Double;
begin
  Result := 1,16 * aWert
end;

_________________
We are, we were and will not be.
Evanescence Threadstarter
Hält's aus hier
Beiträge: 10



BeitragVerfasst: Mi 08.02.06 19:13 
user profile iconGausi hat folgendes geschrieben:
Sowas?
ausblenden Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
function BerechneRabatt(aWert: Double):Double;
begin
  if Wert <= 100 then 
    Result := aWert/10
  else
    Result := aWert/15
end;

Function AddMWST(aWert: Double):Double;
begin
  Result := 1,16 * aWert
end;


hmm kannst du mir erklären was das double bedeutet?
Gausi
ontopic starontopic starontopic starontopic starontopic starontopic starofftopic starofftopic star
Beiträge: 8554
Erhaltene Danke: 481

Windows 7, Windows 10
D7 PE, Delphi XE3 Prof, Delphi 10.3 CE
BeitragVerfasst: Mi 08.02.06 19:17 
Double ist ein Datentyp zur Darstellung von reellen Zahlen. Sowas wie Integer für Kommazahlen ;-)

_________________
We are, we were and will not be.
Tobias1
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starofftopic star
Beiträge: 454

Win 98, XP Prof
D3 Prof, D2005 Prof
BeitragVerfasst: Mi 08.02.06 19:18 
double ist eine (Gleit-)kommazahl-Variable

so wie integer eine Ganzzahl-Variable ist

edit: sorry, zu spät :cry: //könnt ihr löschen

_________________
Auch das schlechteste Buch hat seine gute Seite: die letzte. (John Osborne)
Spaceguide
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic star
Beiträge: 552


(D3/D7/D8) Prof.
BeitragVerfasst: Mi 08.02.06 19:32 
15% von a ist nicht a/15.

Was für ein Rabatt soll bei genau 100€ zurückgegeben werden?
Evanescence Threadstarter
Hält's aus hier
Beiträge: 10



BeitragVerfasst: Mi 08.02.06 19:37 
user profile iconSpaceguide hat folgendes geschrieben:
15% von a ist nicht a/15.

Was für ein Rabatt soll bei genau 100€ zurückgegeben werden?


das hat er leider nicht gesagt... sagen wir mal auch 15
Gausi
ontopic starontopic starontopic starontopic starontopic starontopic starofftopic starofftopic star
Beiträge: 8554
Erhaltene Danke: 481

Windows 7, Windows 10
D7 PE, Delphi XE3 Prof, Delphi 10.3 CE
BeitragVerfasst: Mi 08.02.06 19:40 
user profile iconSpaceguide hat folgendes geschrieben:
15% von a ist nicht a/15.
Peinlich, peinlich... :oops:

_________________
We are, we were and will not be.
Evanescence Threadstarter
Hält's aus hier
Beiträge: 10



BeitragVerfasst: Mi 08.02.06 19:48 
user profile iconGausi hat folgendes geschrieben:
user profile iconSpaceguide hat folgendes geschrieben:
15% von a ist nicht a/15.
Peinlich, peinlich... :oops:



a*15/100... aber da fehlt noch was habe jetzt ein eingabefeld und einen knopf (berechnen) wenn ich da drauf drücke soll das ganze in einem label angezeigt werden.
was du oben geschrieben hast denke ich ist richtig aber ich brauch jetzt den verweis auf vom knopf aufs label...


Zuletzt bearbeitet von Evanescence am Mi 08.02.06 20:07, insgesamt 1-mal bearbeitet
Gausi
ontopic starontopic starontopic starontopic starontopic starontopic starofftopic starofftopic star
Beiträge: 8554
Erhaltene Danke: 481

Windows 7, Windows 10
D7 PE, Delphi XE3 Prof, Delphi 10.3 CE
BeitragVerfasst: Mi 08.02.06 20:02 
*räusper* 15% von a sind nicht a/15*100 sondern a*15/100, oder a*0.15

Für das andere: FormatFloat sollte helfen, ansonsten ein Grundlagen-Tutorial. In das OnClick des Buttons muss rein:

- Wert aus Label auselesen und nach double konvertieren -> StrToFloat
- Neue Werte berechnen -> siehe oben (mit Fehlerkorrektur)
- Neue Werte nach String konvertieren und im Label ausgeben -> FormatFloat

_________________
We are, we were and will not be.
Blackheart666
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starofftopic star
Beiträge: 2195

XP
D3Prof, D6Pers.
BeitragVerfasst: Do 09.02.06 00:26 
Bei einer Inofizielen Umfrage kam heraus das von Einhundert Leuten Fünfzig nicht die Prozentrechnung beherchen das sind mehr als 70% der Befragten.