ΠΡΟΓΡΑΜΜΑ Calculator ΜΕΤΑΒΛΗΤΕΣ ΑΚΕΡΑΙΕΣ: Years,No ΠΡΑΓΜΑΤΙΚΕΣ: no1,no2,no3,result1,result2,result3 ΑΡΧΗ ΓΡΑΨΕ 'Δώστε την τιμή για την πίσσα.' ΔΙΑΒΑΣΕ no1 ΓΡΑΨΕ 'Δώστε την τιμή για την νικοτίνη.' ΔΙΑΒΑΣΕ no2 ΓΡΑΨΕ 'Δώστε την τιμή για το μονοξείδιο του άνθρακα.' ΔΙΑΒΑΣΕ no3 ΓΡΑΨΕ 'Δώστε την τιμή για το πόσα χρόνια θέλεται να υπολογίσεται και για το πλήθος των τσιγάρων ανά μέρα.' ΔΙΑΒΑΣΕ Years,No result1 <-- no1 * 365 * Years * No/1000 result2 <-- no2 * 365 * Years * No/1000 result3 <-- no3 * 365 * Years * No/1000 ΓΡΑΨΕ 'Έχετε καταναλώσει ',result1,' γραμμάρια πίσσα, ', result2,' γραμμάρια νικοτίνη και ', result3,'γραμμάρια μονοξιδείου του άνθρακα.' ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ Calculator