1.   Дан массив А (2, 3.4, 5, 6, 7, 8) найти сумму всех элементов массива, которые кратны 3. Составь программу осталось мало времениЯзык ПаскальЗаранее ​

# Код на ruby 2.2.3p173
def zadanie(s)
    numbers = []
    s.split(" ").each {|t|
        break if t == "2*109"
        numbers << t.to_i
    }

    max = numbers[0] * numbers[4]
    for i in 0..numbers.size - 4
        for j in i + 4..numbers.size - 1
            p [i,j]
            m = numbers[i] * numbers[j]
            max = m if m % 2 == 1 and m > max
        end
    end

    if max % 2 == 1
        return max
    else
        return "IMPOSSIBLE"
    end
end

# Примеры применения
p zadanie("11 12 2 5 7 6 10 2 8 3 2*109 4")