Условный оператор в паскале решение задач https://coursework-info3.webnode.ru/news/uslovnyj-operator-v-paskale-reshenie-zadach/