Алгоритми з циклами ( Pascal)