Алгоритмы ветвления Система программирования Pascal Abc Ветвление 063 Цикл для каждого 1с пример