[kapetang]

Καλησπέρα στην παρέα
Και μια διαφορετική προσέγγιση, από του φίλου Νίκου.
Στηρίζεται στην ακέραια διαίρεση (στη VBA συμβολίζεται με: \) και στο υπόλοιπο (στη VBA συμβολίζεται με: mod).
Για τα συγκεκριμένα δεδομένα έχουμε:
Έτη: 7 + 5 +(6 + 18 + (14 + 28 )\30)\12
Μήνες: (6 + 18 + (14 + 28 )\30) mod 12
Μέρες: (14 + 28 ) mod 30
Μια δοκιμή στο παράθυρο «Immediate» φαίνεται παρακάτω:

?7+5+ (6+18+(14+28)\30)\12  
 14 
?(6+18+(14+28)\30) mod 12
 1 
?(14+28) mod 30
 12

Φιλικά/Γιώργος