Решение задач в паскале процедура https://diplomasrus3.webnode.ru/news/reshenie-zadach-v-paskale-protsedura/