WisFaq!

\require{AMSmath} geprint op vrijdag 29 maart 2024

Programmeren : vierkantsvergelijking oplossen

Ik werk met een TI-83, invoeren waarden a, b en c, berekenen D en D afdrukken lukt allemaal, maar daarna geef ik eens de stappen met if then else want ik krijg telkens error
if D < 0
then
disp "geen opl"
else
if D = 0
then
disp "1opl", -B/(2*A)
else
disp "2opl",(-B-sqrt(D))/(2*A),"en",(-B+sqrt(D))/(2*A)
end
Wat doe ik fout?
Ook als ik al stop na disp "geen opl":end
geeft hij al een foutmelding?

Vanneste Diana
18-4-2013

Antwoord

Ik werk met de TI-89, maar ik veronderstel dat de structuur van het programma gelijkaardig is.
Met de volgende tekst werkt het programma :

:vkv()
:Prgm
:Input a
:Input b
:Input c
:b^2-4*a*c®d
:If d<0 Then
:Disp "geen opl"
:Else
:If d=0 Then
:Disp "1 opl",-b/(2*a)
:Else
:Disp "2 opl",(-b-Ö(d))/(2*a)," en ",(-b+Ö(d))/(2*a)
:EndIf
:EndIf
:EndPrgm



LL
19-4-2013


© 2001-2024 WisFaq
WisFaq - de digitale vraagbaak voor het wiskunde onderwijs - http://www.wisfaq.nl

#70112 - Rekenmachine - 3de graad ASO