XProfan

- Page 2 -

Gary12345

Compile Mark Separation

Proc Lösungsformel1'Wert bei -b-...

    parameters a!,b!,c!
    declare r!
    set("decimals",2)
    r!=-b!-sqrt(b!*b!-4*a!*c!) / 2*a!
    return ROUND(r!,2)

En

/a>

Testwert:
Compile Mark Separation

var Test1! = Lösungsformel1(1,2,1)
print Test1!

If I it correctly. see, is The function then so:

Lösungsformel(a,b,c).

supply with whom oberen Testwerten still incorrect values back. with others Values crashes it again ex?

LG

XProfan X2
MfG
Gary12345

Thomas
Freier

Such still time in the WEB. Z.B.: [...]

Gruß Thomas
Windows XP SP2, XProfan X2

XProfan X2
WinXP, SP3, Core(TM) i7-3770 @ 3.40GHz

probier time r!=b!+sqrt(abs(b!*b!-4*a!*c!)) / 2*a! because XProfan::sqrt negatives
values at Param net so endearing win likes.

gives of my view still incorrect values back? is someone the others opinion? but zumindestens no Fehlermeldungen More.

Gary12345

Compile Mark Separation

Proc Lösungsformel1'Wert bei -b-...

    parameters a!,b!,c!
    declare r!
    set("decimals",2)
    r!=b!+sqrt(abs(b!*b!-4*a!*c!)) / 2*a!
    return ROUND(r!,2)

En

/a>

XProfan X2
MfG
Gary12345

Julian
Schmidt

Hello gary,

probier time. if The same values rauskommen should it correctly. his.

r!=((b!/a!)/2)+sqrt(abs(((b!/a!)/2)^2-(c!/a!)))
r!=((b!/a!)/2)-sqrt(abs(((b!/a!)/2)^2-(c!/a!)))

Greeting

Julian

[OFFTOPIC]The new boxing fallen I do not. New day "Slant-Box" would beautiful. otherwise I will well or ill for this Forum a new Textbaustein for a simple HTML-Box for me to introduce must.

[/OFFTOPIC]

XProfan X2
˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗
Webseite [...]

XProfan X2
WinXP, SP3, Core(TM) i7-3770 @ 3.40GHz

[OFFTOPIC]
Julian Schmidt (28.01.13)

The new boxing fallen I do not. New day "Slant-Box" would beautiful. otherwise I will well or ill for this Forum a new Textbaustein for a simple HTML-Box for me to introduce must.

Habs you installed (see your Posting) -

always since with the ideas for such Codes!
[/OFFTOPIC]

E.T.

gary12345 (28.01.13)

...
has someone a Idea of quadratischen Gleichungen.
...

Jo, I

!! so are Fussboden-Fliesen mostly quadratic and wenn's redeploying is, ought to everything same his

time sincere, ought to one not, if one such Berechnungen manage wants, wenigsten the help gehörige maths "gelöffelt" having

??

gary12345 (28.01.13)

gives of my view still incorrect values back?

question or Feststellung ??
what wären because then The right values ??

XProfan X2
Grüße aus Sachsen... Mario
WinXP, Win7 (64 Bit),Win8(.1),Win10, Win 11, Profan 6 - X4, XPSE, und 'nen schwarzes, blinkendes Dingens, wo ich das alles reinschütte...

Gary12345

Hi,

@Julian Schmidt) come two different values out.
yet others Proposals?

time sincere, ought to one not, if one such Berechnungen manage wants, wenigsten the help gehörige maths "gelöffelt" having ??

1. written can I these calculate
2. The Conversion of written To CODE is tougher as virtual

Bye

MfG
Gary12345

Julian
Schmidt

Hello gary,
No even not!
to Überprüfung of my Lösungsformel of supra, here again The control:

r!=((b!/a!)/2)+sqrt(abs(((b!/a!)/2)^2-(c!/a!)))
r!=((b!/a!)/2)-sqrt(abs(((b!/a!)/2)^2-(c!/a!)))

Erstmal The rechnerische Solution of/ one task...

3x²+9x+6=0 | : 3
x²+3x+2=0

now having we..
p=3 and q=2
now settle we into PQ-Formel one.
means
x1/2 = -(p / 2) +/- root2( (p / 2) ^ 2 - q )
x1/2 = -(3 / 2) +/- root2( (3 / 2) ^ 2 - 2 )

now dissolve. means
x1/2 = -1,5 +/- root2( 2,25 - 2 )
x1/2 = -1,5 +/- root2( 0,25 )
x1/2 = -1,5 +/- 0.5
x1=-1
x2=-2

here come two Solutions out. -1 and -2.

now the whole yet with my supra geposteten Formel.
Compile Mark Separation

CLS
print PQ(3,9,6)
waitinput

Proc PQ

    parameters a!,b!,c!
    set("decimals",2)
    var Lösungsformel1! = -((b!/a!)/2)+sqrt(abs(((b!/a!)/2)^2-(c!/a!)))
    var Lösungsformel2! = -((b!/a!)/2)-sqrt(abs(((b!/a!)/2)^2-(c!/a!)))
    return Str$(ROUND(Lösungsformel1!,2))+" | "+Str$(ROUND(Lösungsformel2!,2))

oc

The spending says me just as -1 and -2

The Formel is correct means!

LG

Julian

XProfan X2
Win7 Professional, SP1, AMD FX(tm)-8350 Eight-Core Processor
˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗
Webseite [...]

Gary12345

was one fallacy, sorry. Have (blöderweise) virtual, that The two values (means The outputted of XPROFAN) same his should. was naturally one Leichtsinnsfehler!

Thank you!

XProfan X2
MfG
Gary12345

Julian
Schmidt

well sooner one grobfahrlässiger Denk and maths-Error.

you should too prevent the negatives roots pulled go can, otherwise becomes you another nice Error Message against jumping. likewise with Division through 0.

Gary12345

Jo I have whom suggestion get, a globale Fehlervariable How mErr& To use. will be but first look, I the any functions (The I me pictured have) incorporate and then can Yes weiterschaun, what draus becomes.

Thank you!

MfG
Gary12345