Να γραφεί πρόγραμμα σε Pascal το οποίο να λύνει το παρακάτω
σύστημα εξισώσεων με τη μέθοδο του μηδενισμού κατά Gauss.
( 1 3 -4 ) (x1) ( 8)
( 1 1 -2 ) (x2) = ( 2)
(-1 -2 5 ) (x3) (-1)
Το πρόγραμμα μπορεί να χωριστεί σε τρεις διαδικασίες:
- Assign: Εκχώρηση στον πίνακα των τιμών.
- Eliminate: Τριγωνισμός του πίνακα με μηδενισμό.
- Substitute: Αντικατάσταση τιμών και εκτύπωση των λύσεων.