100 PRINT"soluzione sistema di equazioni 1 grado
110 PRINT"con GWBASIC"
120 PRINT"sistema a due equazioni"
130 PRINT"a1x +b1y = c1"
135 PRINT"a2x +b2y = c2"
140 PRINT"scrivi i coefficienti del sistema"
150 INPUT "a1=",A1
155 INPUT "b1=",B1
160 INPUT "c1=",C1
170 INPUT "a2=",A2
175 INPUT "b2=",B2
180 INPUT "c2=",C2
200 PRINT"calcolo dei determinanti ds,dx,dy"
210 DS=A1*B2-A2*B1
220 DX=C1*B2-C2*B1
230 DY=A1*C2-A2*C1
250 IF DS<>0 THEN GOTO 300 ELSE GOTO 400
300 X=DX/DS
310 Y=DY/DS
320 PRINT"x=",X
330 PRINT"y=",Y
340 GOTO 600
400 IF DX=0 AND DY=0 THEN GOTO 430 ELSE GOTO 500
430 PRINT"il sistema risulta indeterminato"
440 GOTO 600
500 PRINT"il sistema risulta impossibile"
600 PRINT"fine soluzione"

soluzione sistema di equazioni 1 grado
con GWBASIC
sistema a due equazioni
a1x +b1y = c1
a2x +b2y = c2
scrivi i coefficienti del sistema
a1=1
b1=2
c1=3
a2=4
b2=5
c2=6
calcolo dei determinanti ds,dx,dy
x=            -1
y=             2
fine soluzione
Ok 

soluzione sistema di equazioni 1 grado
con GWBASIC
sistema a due equazioni
a1x +b1y = c1
a2x +b2y = c2
scrivi i coefficienti del sistema
a1=2
b1=4
c1=6
a2=4
b2=8
c2=12
calcolo dei determinanti ds,dx,dy
il sistema risulta indeterminato
fine soluzione
Ok 

soluzione sistema di equazioni 1 grado
con GWBASIC
sistema a due equazioni
a1x +b1y = c1
a2x +b2y = c2
scrivi i coefficienti del sistema
a1=2
b1=4
c1=6
a2=4
b2=8
c2=5
calcolo dei determinanti ds,dx,dy
il sistema risulta impossibile
fine soluzione
Ok 

ritorna