Программирование на Pascal: цикл с параметром for Downto do