Всем большое спасибо за отклик. Да, есть ошибка в 11 и 14 строках - пропустил, пока файл делал руками. Вариант с массивом, у меня выдает ошибку (вводил Ctrl+Shift+Enter). Пока не разобрался в чем проблема. Остальные работают. В первом приближении, пока самым простым кажется вариант от ПавелW. В целом радует, что есть более простые (компактные) решения, чем я "городил" ранее. Еще раз спасибо.