https://acadgrower.ru/video/programmirovanie-na-paskale-cikly-for-ch/