Trovare l'intersezione di due linee è un problema comune in matematica, e quindi è utile avere un programma per computer che può risolvere il problema. Per fare questo, tutto ciò che è necessario è di tradurre i passi che abbiamo tutti imparato nelle nostre lezioni di matematica di scuola media in un algoritmo di Visual Basic, che è un linguaggio di programmazione da parte di Microsoft, può capire.

istruzione

1 Creare un nuovo progetto di Visual Basic facendo clic su "File" e "Nuovo progetto". Scegliere "Applicazione Console", dal momento che ci permette di arrivare alla carne del problema senza doversi preoccupare di GUI (Graphical User Interface) di lavoro irrilevante. In seguito, è possibile utilizzare lo stesso codice esatto in una applicazione GUI, se lo desidera.

2 Definire la linea in quattro variabili: la pendenza e l'intercetta di ogni linea. A tale scopo, incollando il seguente:

Dim firstLineSlope come doppio = 3.0

Dim firstLineYintercept come Doppio = -8

Dim secondLineSlope come doppio = 7.0

Dim secondLineYintercept As Double = 9

Questo sarebbe equivalente alle linee "y = 3x - 8" e "y = 7x + 9." È possibile modificare i numeri per soddisfare le due linee si sta cercando di risolvere per.

3 Trova l'ascissa utilizzando la seguente formula:

Dim x As Double = (firstLineYIntercept - secondLineYintercept) / (SecondLineSlope - firstLineSlope)

Ciò equivale a impostare le equazioni due linee uguali tra loro e semplificando i termini, in questo modo:

3x - 8 = 7x + 9

3x - 7x = 9 - (- 8)

x = -4.25

4 Trova la coordinata y dell'intersezione collegando il valore x ritrovata in una delle linee utilizzando il seguente codice:

Dim y come Double = (firstLineSlope * x) + firstLineYintercept

Questo è equivalente alla seguente calcolo:

y = 3 (-4.25) + (-8)

y = -20,75