Να γραφεί πρόγραμμα που να υπολογίζει το άθροισμα των κυρίων διαγωνίων τετραγωνικού πίνακα ΝxΝ.
ΛΥΣΗ
ΠΡΟΓΡΑΜΜΑ Άθροισμα_Διαγωνίων ΜΕΤΑΒΛΗΤΕΣ ΑΚΕΡΑΙΕΣ:i, j, Sum1, Sum2, Ν, Α[100,100] ΑΡΧΗ ! Εισαγωγή Δεδομένων ΑΡΧΗ_ΕΠΑΝΑΛΗΨΗΣ ΓΡΑΨΕ 'Δώσε διάσταση τετραγωνικού πίνακα: (1-100)' ΔΙΑΒΑΣΕ Ν ΜΕΧΡΙΣ_ΟΤΟΥ Ν>1 ΚΑΙ Ν<=100 ΓΙΑ i ΑΠΟ 1 ΜΕΧΡΙ Ν ΓΙΑ j ΑΠΟ 1 ΜΕΧΡΙ Ν ΓΡΑΨΕ 'ΔΩΣΕ ΣΤΟΙΧΕΙΟ [', i, ' , ',j,' ]' ΔΙΑΒΑΣΕ Α[i,j] ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ ! Άθροισμα Κύριας Sum1 <-- 0 ΓΙΑ i ΑΠΟ 1 ΜΕΧΡΙ Ν Sum1 <-- Sum1 + Α[i,i] ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ ! Άθροισμα Δευτερεύουσας Sum2 <-- 0 ΓΙΑ i ΑΠΟ 1 ΜΕΧΡΙ Ν Sum2 <-- Sum2 + Α[i, Ν+1-i] ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ !Αποτέλεσματα ΓΡΑΨΕ 'ΑΘΡΟΙΣΜΑ ΚΥΡΙΑΣ: ', SUM1 ΓΡΑΨΕ 'ΑΘΡΟΙΣΜΑ ΔΕΥΤΕΡΕΥΟΥΣΑΣ: ', SUM2 ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ
Πρόσφατα σχόλια