Paste2 Logo
  1. $x1=InputBox("Primo x","Inserisci il primo valore di x")
  2. $y1=InputBox("Primo y","Inserisci il primo valore di y")
  3. $noto1=InputBox("Primo Noto","Inserisci il primo termine noto")
  4. $x2=InputBox("Secondo x","Inserisci il secondo valore di x")
  5. $y2=InputBox("Secondo y","Inserisci il secondo valore di y")
  6. $noto2=InputBox("Secondo Noto","Inserisci il secondo termine noto")
  7.  
  8. $d=Execute(($x1*$y2)-($y1*$x2))
  9. $dx =Execute(($noto1*$y2)-($noto2*$y1))
  10.     $dy =Execute(($x1*$noto2)-($x2*$noto1))
  11.     $x  = Execute($dx/$d)
  12.     $y  = Execute($dy/$d)
  13.         MsgBox(0,"",$x&@crlf&$y)

Soluzione di un sistema con il metodo di cramer By Red Skull 92