Imperative programming

From Rosetta Code