soluzione grafica e algebrica di sistema lineare

scrivere programma con notes e registrare (qlineare.txt):richiamare con Open "qlineare.txt"

# programma per soluzione sistema lineare con 2 equazioni
#
# a1x+b1y=c1
# a2x+b2y=c2
#
# assegnare valori ai coefficienti 
a1=2.0;b1=3.0;c1=-5.0
a2=6.0;b2=5.0;c2=-3.0
# scrivere le due equazioni
f1(x,y)=a1*x+b1*y+c1
f2(x,y)=a2*x+b2*yqc2
# risolvere rispetto a x
f1y(x)=(-a1*x+c1)/b1
f2y(x)=(-a2*x+c2)/b2
# disegnare rette 
# se le rette sono coincidenti,sistema indeterminato
# se le rette sono parallele,sistema impossibile
# se le rette sono intersecanti,sistema determinato
# se determinato procedere al calcolo di x,y
set grid
plot f1y(x),f2y(x)
#
ds=(a1*b2)-(a2*b1)
#
dx=(c1*b2)-(c2*b1)
#
dy=(a1*c2)-(a2*c1)
#
print ds
print dx
print dy
x=dx/ds
y=dy/ds
print "x =",x
print "y =",y
#
# qlineare1.txt