Deklaration MWST - Achtung:Totaler NOOB!

**Jenny84**

Ich muss für den Informatikunterricht ein Bruttoberechnungsprogramm schreiben, in welchem die MwSt schon deklariert/festgelegt ist. Ich habe gegooglet wie ne Irre und finde immer was mit
//const mwst=16
aber es klappt nie.

Außerdem, sobald ich in meinem Programm eine Zahl im Nettofenster eingebe, kommt diese Fehlermeldung:
" ist kein gültiger Gleitkommawert

So sieht mein Code momentan aus:

zusammenfalten · markieren

Delphi-Quellcode:

			var

Form1: TForm1;

vnetto, vbrutto, vmwst:single;

const

mwst=16.0;

implementation

{$R *.dfm}

procedure TForm1.nettoChange(Sender: TObject);

begin

//Eingabe

vnetto:=strtofloat(netto.Text);

vmwst:=strtofloat(mwst.Text);

//Verarbeitung

vbrutto:=vnetto+vnetto*vmwst/100.0;

//Ausgabe

brutto.Text:=floattostr(vbrutto);

end;

procedure TForm1.Button1Click(Sender: TObject);

begin

brutto.Text:=floattostr(vbrutto);

brutto.Text:=floattostr(strtofloat (netto.text)+strtofloat (netto.Text)*strtofloat(mwst.Text)/100.0);

end;

procedure TForm1.Button2Click(Sender: TObject);

begin

close;

end;

end.

[edit=alcaeus]Code mit Delphi-Tags formatiert. Mfg, alcaeus[/edit]

Deklaration MWST - Achtung:Totaler NOOB!

Deklaration MWST - Achtung:Totaler NOOB!

Forumregeln