Γράψε
"-------------------------------------------"
Γράψε
"Άθροισμα στοιχείων πίνακα μίας διάστασης"
Γράψε
"-------------------------------------------"
A <- [3, 8, 7, 6, 5, 9, 7, 2, 6, 7]
άθροισμα <- 0
Για
i
Από
1
Μέχρι
10
Με_Βήμα
1
άθροισμα <- άθροισμα + A[i]
Τέλος_Επανάληψης
Για
i
Από
1
Μέχρι
10
Με_Βήμα
1
Γράψε
i, "ο στοιχείο = ", A[i]
Τέλος_Επανάληψης
Γράψε
"-------------------------------------------"
Γράψε
"Άθροισμα = ", άθροισμα
Γράψε
"-------------------------------------------"