Turbo Basic
soluzione e discussione sistema lineare
print "soluzione sistema con due equazioni con TURBO BASIC"
print"sistema in forma canonica"
print"a1x + b1y = c1"
print"a2x + b2y = c2"
print"scrivi i coefficienti delle equazioni"
input"a1=",a1&
input"b1=",b1&
input"c1=",c1&
input"a2=",a2&
input"b2=",b2&
input"c2=",c2&
print"a1=",a1&
print"b1=",b1&
print"c1=",c1&
print"a2=",a2&
print"b2=",b2&
print"c3=",c3&
print"calcolo del discriminante del sistema ds,dx,dy"
ds&=a1&*b2&-a2&*b1&
dx&=c1&*b2&-c2&*b1&
dy&=a1&*c2&-a2&*c1&
print"discriminante=",ds&
if ds&<>0 then goto 100 else goto 300
100
print"sistema determinato con soluzioni:"
x&=dx&/ds&
y&=dy&/ds&
print"x=",x&
print"y=",y&
goto 600
300
if (dx&=0) and (dy&=0) then goto 400 else goto 500
400
print"il sistema risulta indeterminato"
goto 600
500
print"il sistema risulta impossibile"
goto 600
600
print"fine soluzione"
soluzione sistema con due equazioni con TURBO BASIC
sistema in forma canonica
a1x + b1y = c1
a2x + b2y = c2
scrivi i coefficienti delle equazioni
a1=2
b1=3
c1=4
a2=6
b2=5
c2=8
a1= 2
b1= 3
c1= 4
a2= 6
b2= 5
c3= 0
calcolo del discriminante del sistema ds,dx,dy
discriminante= -8
sistema determinato con soluzioni:
x= 0
y= 1
fine soluzione
soluzione sistema con due equazioni con TURBO BASIC
sistema in forma canonica
a1x + b1y = c1
a2x + b2y = c2
scrivi i coefficienti delle equazioni
a1=2
b1=4
c1=6
a2=4
b2=8
c2=3
a1= 2
b1= 4
c1= 6
a2= 4
b2= 8
c3= 0
calcolo del discriminante del sistema ds,dx,dy
discriminante= 0
il sistema risulta impossibile
fine soluzione
soluzione sistema con due equazioni con TURBO BASIC
sistema in forma canonica
a1x + b1y = c1
a2x + b2y = c2
scrivi i coefficienti delle equazioni
a1=2
b1=4
c1=6
a2=4
b2=8
c2=12
a1= 2
b1= 4
c1= 6
a2= 4
b2= 8
c3= 0
calcolo del discriminante del sistema ds,dx,dy
discriminante= 0
il sistema risulta indeterminato
fine soluzione