Πώς να Υπολογίστε τη διασταύρωση των δύο γραμμών σε Visual Basic

Βρίσκοντας το σημείο τομής των δύο γραμμών είναι ένα κοινό πρόβλημα στα μαθηματικά , και ως εκ τούτου , είναι χρήσιμο να έχουμε ένα πρόγραμμα υπολογιστή που μπορεί να λύσει το πρόβλημα . Για να το κάνετε αυτό , το μόνο που χρειάζεται είναι να μεταφράσει τα βήματα που όλοι μάθαμε στο γυμνάσιο μαθηματικά τάξεις μας σε έναν αλγόριθμο Visual Basic , η οποία είναι μια γλώσσα προγραμματισμού από τη Microsoft , μπορεί να καταλάβει . Οδηγίες
Η

1 Δημιουργήστε ένα νέο έργο της Visual Basic κάνοντας κλικ στο " Αρχείο" και "New Project ". Επιλέξτε " Εφαρμογή κονσόλας , " δεδομένου ότι μας επιτρέπει να φτάσουμε στο κρέας του προβλήματος , χωρίς να χρειάζεται να ανησυχείτε για άσχετο GUI ( Graphical User Interface) εργασία . Αργότερα , μπορείτε να χρησιμοποιήσετε ακριβώς το ίδιο κωδικό σε μια εφαρμογή GUI αν το επιλέξετε 2

Ορίστε τη γραμμή σε τέσσερις μεταβλητές : . Την κλίση και το σημείο τομής της κάθε γραμμής . Κάνετε αυτό με την επικόλληση το εξής :

Δημ. firstLineSlope ως διπλό = 3.0

Δημ. firstLineYintercept ως διπλό = -8

Δημ. secondLineSlope ως διπλό = 7,0

dim secondLineYintercept As Double = 9

Αυτό θα είναι ισοδύναμες με τις γραμμές " y = 3x - 8 " " . y = 7x + 9 " και Μπορείτε να αλλάξετε τους αριθμούς για να ταιριάζει με τις δύο γραμμές που προσπαθούν να λύσουν για
εικόνων 3

Βρείτε το x -συντεταγμένη με τον ακόλουθο τύπο : .

Dim x ως διπλό = ( firstLineYIntercept - secondLineYintercept ) /( SecondLineSlope - firstLineSlope )

Αυτό ισοδυναμεί με τη ρύθμιση των εξισώσεων δύο γραμμών είναι ίσα μεταξύ τους και την απλούστευση των όρων , όπως αυτό :

3x - 8 = 7x + 9

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

x = -4.25
Η 4

Βρείτε η y-συντεταγμένη της τομής , συνδέοντας το πρόσφατα βρέθηκε x αξία σε μία από τις γραμμές χρησιμοποιώντας τον ακόλουθο κώδικα :

y Dim ως διπλό = ( firstLineSlope * x ) + firstLineYintercept

Αυτό είναι ισοδύναμο με το ακόλουθο μαθηματικά :

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

y = -20.75
Η
εικόνων