../../Task/Loops-While/PascalABC.NET