Код бредовый. Автор не имеет ни малейшего представления даже об основах программирования: массивах и циклах.
Этот код можно сделать на порядок-другой (sic!) короче, а также намного производительней и логичней.
Минздрав предупреждает:
Куренье [тяжелых наркотиков]- это яд!
Миздрав предупреждет,
Ну а [IF...THEN] ни в чём не виноват. (с)