Archief - [PROG][VB.NET] Vierkantswortel

Duffman- · 6 nov 2005

Beste,

ik moet voor school een programmaatje schrijven dat automatisch de discriminant berekend, nu zullen jullie denken, dit is niet zo moeilijk, en dat is het inderdaad niet, maar ik weet niet hoe ik een vierkantswortel moet berekenen. Kan iemand mij daar helpen? is er misschien een toetsencombinatie die een vierkantswortel vormt? Ik heb ook in mijn cursus gezocht, maar daar vind ik enkel machtsverheffingen, product, deling, gehele deling, rest na deling en som ...

Kan iemand me helpen?

frmTweedeGraadsvergelijking

Dim decDiscriminant As Decimal
Dim decNulpunt1 As Decimal
Dim decNulount 2 As Decimal
Dim deCA As Decimal
Dim decB As Decimal
Dim decC As Decimal

decDiscriminant = decB^2 - 4 * decA * decC

If decDiscriminant > 0 Then
decNulpunt1 =

dat is al wat ik heb ... nu moet ik dus de vierkantswortel berekenen van: decDiscrimnant
want ik moet de berekening hebben: (-decB+*vierkantswortel*decD)/2A

Dank bij voorbaat.

Tyfius · 6 nov 2005

Ik ken niets van VB.NET, maar in andere talen noemt die functie meestal "sqrt" of iets dergelijks.

Duffman- · 6 nov 2005

Tyfius zei:
Ik ken niets van VB.NET, maar in andere talen noemt die functie meestal "sqrt" of iets dergelijks.

mja ik zou eventueel kunnen verheffen tot de macht 0.5 maar ik zou er graag een functie voor hebben.

Dit is wat ik heb

Code:

frmTweedeGraadsvergelijking

Dim decDiscriminant As Decimal
Dim decNulpunt1 As Decimal
Dim decNulount 2 As Decimal
Dim deCA As Decimal
Dim decB As Decimal
Dim decC As Decimal

decDiscriminant = (decB)² - 4 * decA * decB

If decDiscriminant  > 0 Then 
 	decNulpunt1 = (-decB +  Math.sqrt(decDiscriminant))/2A
‘Of decDiscriminant ^ 0.5
	decNulpunt2 = (-decB – Math.sqrt(decDiscriminant))/2A
‘Of decDiscriminant ^ 0.5
Else
	If decDiscriminant = 0 Then
		decNulpunt1 = -decB/ 2A
	End if
End if

	
txtDiscriminant.Text = decDiscriminant
txtNulpunt1.Text = decNulpunt1
txtNulpunt2.Text = decNulpunt2

tha_rippa1be · 6 nov 2005

sqr() ?
dit werkt in Visual Studio 6.0

killer bel · 6 nov 2005

Math.Sqrt()

edit, je kan al je variabelen declareren, in een lijn hoor. de regel hiervoor is dat ze allemaal van dezelfde soort moeten zijn.

bv

Code:

dim getal1, getal2, getal3, getal4 as integer

dat zou in geval dus dit moeten zijn

Code:

Dim decDiscriminant, decNulpunt1, decNulount2, deCA, decB, decC As Decimal

veel minder typwerk hé

Duffman- · 6 nov 2005

killer bel zei:
Math.Sqrt()

edit, je kan al je variabelen declareren, in een lijn hoor. de regel hiervoor is dat ze allemaal van dezelfde soort moeten zijn.

bv

Code:

dim getal1, getal2, getal3, getal4 as integer

dat zou in geval dus dit moeten zijn

Code:

Dim decDiscriminant, decNulpunt1, decNulount2, deCA, decB, decC As Decimal

veel minder typwerk hé

thx voor de tip!

Nog een vraagje:

instr("m","0123456789")

wa gaat dat als resultaat geven?

Is dat hetzelfde als:

Code:

strGetal = 0123456789
strGetal.IndexOf("m")

killer bel · 6 nov 2005

ik geloof het wel, normaal zouden die allebei de waarde 0 moeten doorgeven

Duffman- · 6 nov 2005

killer bel zei:
ik geloof het wel, normaal zouden die allebei de waarde 0 moeten doorgeven

dat zou dan niet correct zijn

want

Code:

 Instr("O","0123456789")

zou 0 moeten geven, nee?
Of geeft dat 1? Ik heb altijd geloofd dat .net begint te tellen bij 0!

killer bel · 6 nov 2005

je voorbeeld was wel dit

instr("m", "0123456789")

en aangezien er geen m in 0123456789 komt zou het de waarde nul moeten zijn.

maar ik kan ook fout zitten hoor, test het eens uit dan weet je het.

Aetemon · 6 nov 2005

killer bel zei:
je voorbeeld was wel dit

instr("m", "0123456789")

en aangezien er geen m in 0123456789 komt zou het de waarde nul moeten zijn.

maar ik kan ook fout zitten hoor, test het eens uit dan weet je het.

een exception error dinges of waarde null

drieskeuh · 6 nov 2005

of tot de macht ^1/2

Cakeman · 6 nov 2005

Aetemon zei:
een exception error dinges of waarde null

Geeft de integer value 0 terug.

Edit: voor de vierkantswortel: Math.Sqrt(value)
Voorbeeld: Math.Sqrt(25) geeft 5 terug.

Moto · 7 nov 2005

Hopelijk is informatica niet uw hoofdrichting als ge zo iets belachelijks al niet kunt vinden

Duffman- · 7 nov 2005

Moto zei:
Hopelijk is informatica niet uw hoofdrichting als ge zo iets belachelijks al niet kunt vinden

Toch wel

Maar dit is mijn eerste jaar programmeren ... kzit int 5de middelbaar hé :confused:

En allé explain, waarom is informatica nu hopelijk ni men hoofdvak ...

messiah´ · 7 nov 2005

Nja, 't valt best te begrijpen dat je de functie niet uit het hoofd wist. Maar zoiets had je makkelijk in de help/documentatie kunnen vinden. Hoewel je al een creatieve oplossing (zijnde tot de 0,5de macht verheffen) had gevonden, die waarschijnlijk anderen dan weer niet hadden bedacht.

Wij kregen vorig jaar nochtans zo'n blad met daarop de belangrijkste (string-)functies.

Duffman- · 7 nov 2005

messiah´ zei:
Nja, 't valt best te begrijpen dat je de functie niet uit het hoofd wist. Maar zoiets had je makkelijk in de help/documentatie kunnen vinden. Hoewel je al een creatieve oplossing (zijnde tot de 0,5de macht verheffen) had gevonden, die waarschijnlijk anderen dan weer niet hadden bedacht.

Wij kregen vorig jaar nochtans zo'n blad met daarop de belangrijkste (string-)functies.

messiah, het probleem is, ik heb mijn .net 2003 nog steeds niet ontvangen. Anders had ik de hulp wel gebruikt. Ik moest oefeningen voorbereiden in Word. Daarme dat ik de hulp niet gebruikte.

Ik heb mijn .net2003 wel besteld via het school (voor een prijs van 2,5 EURO!, en tis legaal)

en op dat blad stonden rekenkundige operatoren, maar vierkantswortel niet!

wel vreemd

.:KrusT:. · 8 nov 2005

Tip voor als ge uw VS2003 nog niet hebt: Als je gewoon het framework installeert (voor VS2003 zal dat 1.1 zijn), en dan op de site http://www.asp.net/webmatrix/ de webmatrix download (is eveneens voor framework 1.1), dan heb je toegang tot een klassebrowser.

The Crazy Frog · 9 nov 2005

Tkan zijn dak mij vergis, maar ik ep ergens gelezen dat het ^ symbool in vb.net niet voor machten is...
Of ebbek da verkeerd op? :unsure:

Duffman- · 9 nov 2005

The Crazy Frog zei:
Tkan zijn dak mij vergis, maar ik ep ergens gelezen dat het ^ symbool in vb.net niet voor machten is...
Of ebbek da verkeerd op?

dat is juist ...

.:KrusT:. · 9 nov 2005

killer bel zei:
je voorbeeld was wel dit

instr("m", "0123456789")

en aangezien er geen m in 0123456789 komt zou het de waarde nul moeten zijn.

maar ik kan ook fout zitten hoor, test het eens uit dan weet je het.

Voorbeeld zit verkeerd in elkaar. Voor de komma komt de string waarin gezocht moet worden, na de komma de te zoeken string. vb:

instr("1234", "5") => Geeft 0 (niet gevonden)

instr("1234", "1") => Geeft 1 (gevonden op positie 1)

Archief - [PROG][VB.NET] Vierkantswortel

Duffman-

Legacy Member

Tyfius

Legacy Member

Duffman-

Legacy Member

tha_rippa1be

Legacy Member

killer bel

Legacy Member

Duffman-

Legacy Member

killer bel

Legacy Member

Duffman-

Legacy Member

killer bel

Legacy Member

Aetemon

Legacy Member

drieskeuh

Legacy Member

Cakeman

Legacy Member

Moto

Legacy Member

Duffman-

Legacy Member

messiah´

Legacy Member

Duffman-

Legacy Member

.:KrusT:.

Legacy Member

The Crazy Frog

Legacy Member

Duffman-

Legacy Member

.:KrusT:.

Legacy Member