! Να γραφεί πρόγραμμα το οποίο :
! - θα δέχεται τα οκτώ ψηφία (bit) ενός byte που αντιστοιχούν
! στη δυαδική απεικόνιση ενός αριθμού και
! - θα υπολογίζει και εμφανίζει την τιμή του αριθμού στο δεκαδικό σύστημα.
! Υπενθυμίζεται ότι τα ψηφία πρέπει να είναι 0 ή 1,
! οπότε πρέπει να γίνεται ο κατάλληλος έλεγχος και να μη γίνονται δεκτά άλλα ψηφία.
! Το πρώτο ψηφίο που θα δοθεί είναι το περισσότερο σημαντικό.
ΠΡΟΓΡΑΜΜΑ byte
ΜΕΤΑΒΛΗΤΕΣ
ΑΚΕΡΑΙΕΣ: bit[8] , i
ΠΡΑΓΜΑΤΙΚΕΣ: dec
ΑΡΧΗ
dec <-- 0
ΓΙΑ i ΑΠΟ 1 ΜΕΧΡΙ 8
ΓΡΑΨΕ 'Δώσε το ψηφίο Νο : ' , i
ΔΙΑΒΑΣΕ bit[i]
ΟΣΟ (bit[i] <> 0) ΚΑΙ (bit[i] <>1) ΕΠΑΝΑΛΑΒΕ
ΓΡΑΨΕ 'Ξαναδώσε το ψηφίο Νο : ' , i , ' (πρέπει να είναι 0 ή 1 )'
ΔΙΑΒΑΣΕ bit[i]
ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
dec <-- dec + bit[i]*2^(8-i)
ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
ΓΡΑΨΕ_ 'Ο αριθμός '
ΓΙΑ i ΑΠΟ 1 ΜΕΧΡΙ 8
ΓΡΑΨΕ_ bit[i]
ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
ΓΡΑΨΕ ' στο δυαδικό σύστημα,'
ΓΡΑΨΕ 'Αντιστοιχεί στον αριθμό ' , dec , ' στο δεκαδικό σύστημα.'
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ