Άσκηση Α.Ε.Π.Π.

Θα ήθελα άμα μπορούσε κάποιος να μου δώσει καμιά ιδέα πάνω σε μια άσκηση, δεν χρειάζετε να τη λύσετε, και οι ιδέες είναι ευπρόσδεκτες.

Να γραφτεί αλγόριθμος που να διαβάζει έναν αριθμό, διαφορετικού του μηδενός, και θα υπολογίζει το πλήθος των ακέραιων ψηφίων του. Να χρησιμοποιηθεί ΜΟΝΟ ΔΟΜΗ ΑΚΟΛΟΥΘΙΑΣ.

Η λύση βρέθηκε! Την ποστάρω μήπως τυχόν και υπάρχουν και άλλοι τρελοί καθηγητές που βάζουν τέτοιες ασκήσεις.

Αλγόριθμος Κ38
Εμφάνισε "Δώσε αριθμό διαφορετικό του μηδενός."
Διάβασε αρ
αρ<--Α_Τ(αρ)
ΨΗΦΙΑ<--Α_Μ((ΛΟΓ(αρ)/ΛΟΓ(10))+1
Εμφάνισε ΨΗΦΙΑ
Τέλος Κ38