../../Task/Damm-algorithm/Modula-3