ln (1 + x) in eigenen Code ohne Math.Log(1 + x)
- VB.NET
Sie verwenden einen veralteten Browser (%browser%) mit Sicherheitsschwachstellen und können nicht alle Funktionen dieser Webseite nutzen.
Hier erfahren Sie, wie einfach Sie Ihren Browser aktualisieren können.
Hier erfahren Sie, wie einfach Sie Ihren Browser aktualisieren können.
Es gibt 44 Antworten in diesem Thema. Der letzte Beitrag () ist von Facebamm.
-
-
Falls Du diesen Code kopierst, achte auf die C&P-Bremse.
Jede einzelne Zeile Deines Programms, die Du nicht explizit getestet hast, ist falsch
Ein guter .NET-Snippetkonverter (der ist verfügbar).
Programmierfragen über PN / Konversation werden ignoriert! -
-
dekon12 schrieb:
k ist ja nicht 0For k As Integer = 0 To 5 Step 1
dekon12 schrieb:
Option Strict On habe ich drinDim x As Double = TextBox1.Text
Willst du uns verkackeiern?--
If Not Program.isWorking Then Code.Debug Else Code.DoNotTouch
-- -
dekon12 schrieb:
Option Strict On habe ich drindekon12 schrieb:
Falls Du diesen Code kopierst, achte auf die C&P-Bremse.
Jede einzelne Zeile Deines Programms, die Du nicht explizit getestet hast, ist falsch
Ein guter .NET-Snippetkonverter (der ist verfügbar).
Programmierfragen über PN / Konversation werden ignoriert! -
Ich habe mich falsch ausgedrückt. Welche Formel versuchst Du umzusetzen und in Code zu gießen?Dieser Beitrag wurde bereits 5 mal editiert, zuletzt von „VaporiZed“, mal wieder aus Grammatikgründen.
Aufgrund spontaner Selbsteintrübung sind all meine Glaskugeln beim Hersteller. Lasst mich daher bitte nicht den Spekulatiusbackmodus wechseln. -
Falls Du diesen Code kopierst, achte auf die C&P-Bremse.
Jede einzelne Zeile Deines Programms, die Du nicht explizit getestet hast, ist falsch
Ein guter .NET-Snippetkonverter (der ist verfügbar).
Programmierfragen über PN / Konversation werden ignoriert! -
Da ich seinen Code bis zu diesem Post nicht gesehen hatte, bin ich eiskalt davon ausgegangen, dass er es geändert hat. Will heißen, ich setze es voraus. Ansonsten geht's eben nicht weiter mit der Hilfe.Dieser Beitrag wurde bereits 5 mal editiert, zuletzt von „VaporiZed“, mal wieder aus Grammatikgründen.
Aufgrund spontaner Selbsteintrübung sind all meine Glaskugeln beim Hersteller. Lasst mich daher bitte nicht den Spekulatiusbackmodus wechseln. -
-
VaporiZed schrieb:
Ansonsten geht's eben nicht weiter mit der Hilfe.Falls Du diesen Code kopierst, achte auf die C&P-Bremse.
Jede einzelne Zeile Deines Programms, die Du nicht explizit getestet hast, ist falsch
Ein guter .NET-Snippetkonverter (der ist verfügbar).
Programmierfragen über PN / Konversation werden ignoriert! -
Habe die zwei Themen zusammengeführt.
@dekon12 warum machst du ein neues Thema auf wenn in diesem fleißig geholfen wird?
Nehme die Hilfe an und beherzige die Ratschläge von den Usern die wissen, was sie dir aus welchem Grund vorschlagen.If _work = worktype.hard Then Me.Drink(Coffee)
Seht euch auch meine Tutorialreihe <WPF Lernen/> an oder abonniert meinen YouTube Kanal.
## Bitte markiere einen Thread als "Erledigt" wenn deine Frage beantwortet wurde. ##
-
Ich hoffe ich habe es verstanden!
Fehler bitte anmerken!
VB.NET-Quellcode
- Option Strict On
- Public Class Form1
- Private Sub Label4_Click(sender As Object, e As EventArgs) Handles Label4.Click
- End Sub
- Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
- Dim i As String
- Dim x As Double
- Dim n As Integer
- TextBox1.Text = x.ToString()
- TextBox2.Text = n.ToString()
- For k As Integer = 1 To n Step 1
- i = (x ^ k / k).ToString()
- Next k
- x = Math.Log(1 + x)
- TextBox3.Text &= "" & i
- TextBox4.Text &= "" & x
- End Sub
-
dekon12 schrieb:
Dim n As Integer
For k As Integer = 1 To n Step 1--
If Not Program.isWorking Then Code.Debug Else Code.DoNotTouch
-- -
-
dekon12 schrieb:
Das ist die verkehrte Richtung.
Du willst doch die Strings aus den TextBoxen als numerische Werte haben.Falls Du diesen Code kopierst, achte auf die C&P-Bremse.
Jede einzelne Zeile Deines Programms, die Du nicht explizit getestet hast, ist falsch
Ein guter .NET-Snippetkonverter (der ist verfügbar).
Programmierfragen über PN / Konversation werden ignoriert! -
Macht das mehr Sinn?
VB.NET-Quellcode
- Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
- Dim x As Double = CType(TextBox1.Text, Double)
- Dim n As Double = CType(TextBox2.Text, Double)
- For k As Double = 1 To n Step 1
- Dim i As Double = (x ^ k / k)
- TextBox3.Text &= "" & i
- x = Math.Log(1 + x)
- TextBox4.Text &= "" & x
- Next k
- End Sub
-
Ja, ist besser.
Das jetzt wäre noch etwas besser:
Oder gleich die Verwendung von NumericUpDowns, da die immer nur Zahlen enthalten. Da ist eine Umwandlung Text-zu-Zahl nicht nötig.
Die Zeilen#10-#12 gehören aber nicht in die Schleife, die haben ja was mit dem Endergebnis zu tun. Und mach bitte aus denen:
##########
@dekon12: Bitte noch die Quelle Deiner mathematischen Formel verlinken, damit wir prüfen können, wo ggf. der Fehler liegt. Ich zumindest kenne auf Anhieb keine rekursive ln-Formel.
Dieser Beitrag wurde bereits 5 mal editiert, zuletzt von „VaporiZed“, mal wieder aus Grammatikgründen.
Aufgrund spontaner Selbsteintrübung sind all meine Glaskugeln beim Hersteller. Lasst mich daher bitte nicht den Spekulatiusbackmodus wechseln.Dieser Beitrag wurde bereits 1 mal editiert, zuletzt von „VaporiZed“ ()
-
-
Ok, ich habe es nachgestellt.
Beantworte mal bitte folgende Fragen, damit ich weiß, ob Du bei der Formel klarkommst:
Wofür stehtn
? Welche Werte können in TextBox1 und TextBox2 stehen?
Zum Code: Du hast
(dasStep 1
und dask
beiNext k
kann man weglassen)
in jedem Schleifendurchgang berechnest Dui
neu. Das ist inhaltlich falsch. Und: Wo ist die Alternierung? Es geht ja immer -, +, -, +. Die fehlt in Post#36.Dieser Beitrag wurde bereits 5 mal editiert, zuletzt von „VaporiZed“, mal wieder aus Grammatikgründen.
Aufgrund spontaner Selbsteintrübung sind all meine Glaskugeln beim Hersteller. Lasst mich daher bitte nicht den Spekulatiusbackmodus wechseln. -
-
Ähnliche Themen