Finne skjæringspunktet mellom to linjer er et vanlig problem i matematikk , og dermed er det nyttig å ha et dataprogram som kan løse problemet . For å gjøre dette , er alt som er nødvendig for å oversette trinnene vi alle lært i våre ungdomsskole matematikk klasser i en algoritme Visual Basic, som er et programmeringsspråk fra Microsoft , kan forstå . Instruksjoner
en

Opprett en ny Visual Basic-prosjekt ved å klikke på "File" og "New Project ". Velg "Console Application ", siden det lar oss komme til kjøtt av problemet uten å måtte bekymre seg irrelevant GUI ( Graphical User Interface) arbeid. Senere kan du bruke nøyaktig samme koden i et GUI -program hvis du ønsker det
2

Definer linjen inn i fire variabler : . Skråningen og skjæringspunkt for hver linje . Gjør dette ved å lime inn følgende : en

Dim firstLineSlope som Double = 3,0

Dim firstLineYintercept som Double = -8

Dim secondLineSlope som Double = 7,0

Dim secondLineYintercept Som Double = 9
p Dette ville tilsvare linjene " y = 3x - 8 " " . y = 7x + 9 " og Du kan endre tallene til å passe de to linjene du prøver å løse for
3

Finn den x -koordinat ved hjelp av følgende formel : .

Dim x som Double = ( firstLineYIntercept - secondLineYintercept ) /( SecondLineSlope - firstLineSlope )
p Dette tilsvarer sette tolinjers ligninger lik hverandre og forenkle vilkårene , som dette : en

3x - 8 = 7x + 9

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

x = -4,25
4

Finn den y -koordinat av krysset ved å koble nylig funnet x-verdien inn i en av linjene ved hjelp av følgende kode :

Dim y som Double = ( firstLineSlope * x ) + firstLineYintercept
p Dette tilsvarer følgende regnestykket:
< p> y = 3 ( -4,25 ) + ( -8 )

y = -20,75