! --------------------------------------------------------
! Το πρόγραμμα θα διαβάζει τον αριθμό των δόσεων που επιθυμεί ο πελάτης,
! την αξία του υπολογιστή (σε Ευρώ) που θέλει να αγοράσει
! και θα εμφανίζει το ποσό απόπληρωμής
! (με τον τόκο της τάξης του 11%) καθώς και το ποσό κάθε δόσης
! --------------------------------------------------------
ΠΡΟΓΡΑΜΜΑ Αξία_HY
ΣΤΑΘΕΡΕΣ
ΠΟΣΟΣΤΟ_ΤΟΚΟΣ = 11
ΜΕΤΑΒΛΗΤΕΣ
ΠΡΑΓΜΑΤΙΚΕΣ: Τιμή_αγοράς, Ποσό_αποπληρωμής, Ποσό_δόσης
ΑΚΕΡΑΙΕΣ: Δόσεις
ΑΡΧΗ
ΓΡΑΨΕ 'Δώσε την τιμή αγοράς του υπολογιστή'
ΔΙΑΒΑΣΕ Τιμή_αγοράς
ΓΡΑΨΕ 'Δώσε τον αριθμό των δόσεων'
ΔΙΑΒΑΣΕ Δόσεις
Ποσό_αποπληρωμής <-- Τιμή_αγοράς + (Τιμή_αγοράς * ΠΟΣΟΣΤΟ_ΤΟΚΟΣ) / 100
Ποσό_δόσης <-- Ποσό_αποπληρωμής / Δόσεις
ΓΡΑΨΕ 'Το τελικό ποσό αποπληρωμής είναι:',Ποσό_αποπληρωμής,'Ευρώ και το ποσό κάθε δόσης είναι:',Ποσό_δόσης,'Ευρώ'
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ Αξία_ΗΥ