Καλησπέρα σας,
Αντιμετωπίζω το εξής
Έχω εναν πίνακα 10 θέσεων με τιμές απο το 1 εως 10
Θέλω να αντιγραφω αυτες τις τιμές σε μια συνδεδεμένη λίστα και να τις εμφανιζω
Εχω κανει αυτόν τον αλγόριθμο
ΑΛΓΟΡΙΘΜΟΣ ΠΑΡΑΔ1
ΚΟΜΒΟΣ
NUM:INTEGER;
NEXT:POINTER[ΚΟΜΒΟΣ]
ΔΕΔΟΜΕΝΑ
CUR, FIRST, NEW:POINTER[ΚΟΜΒΟΣ]
ΠΙΝ: ARRAY [1..10] OF INTEGER; // ΘΕΩΡΩ ΟΤΙ Ο ΠΙΝΑΚΑΣ ΕΙΝΑΙ ΓΕΜΑΤΟΣ
Ι:INTEGER
ΑΡΧΗ
ΥΠΟΛΟΓΙΣΕ ΔΗΜΙΟΥΡΓΗΣΕ-ΚΟΜΒΟ(NEW)
NEW^.NUM=ΠΙΝ[1]
NEW^.NEXT=NIL
FIRST=NEW
CUR=FIRST
ΓΙΑ Ι ΑΠΟ 2 ΜΕΧΡΙ 10
ΥΠΟΛΟΓΙΣΕ ΔΗΜΙΟΥΡΓΗΣΕ-ΚΟΜΒΟ(NEW)
NEW^.NUM=ΠΙΝ[Ι]
NEW^.NEXT=NIL
CUR^.NEXT=NEW
CUR=NEW
ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
Έπειτα θέλω να εμφανίσω τα περιεχόμενα της λίστας απο την αρχή εως τον τελευταίο κόμβο. Η λογική ειναι μια δομή επανάληψης απο τον FIRST εως Ν(οπου Ν το σύνολο των θέσεων του πίνακα) και με τον CUR θα προχωράω και θα εμφανίζω κάθε κομβο??? Όποιος μπορεί να δώσει ενα χέρι βοηθείας