Главная — Семестр 2

Обновлено: 16 March 2019 17:03

Задача

Необходимо взять и оптимизировать следующий алгоритм

# Количетсво счастливых билетиков
k <- 0

# Количество интераций
n <- 0

for(i1 in 0:9){
    for(i2 in 0:9){
        for(i3 in 0:9){
            for(i4 in 0:9){
                for(i5 in 0:9){
                    for(i6 in 0:9){
                        n <- n + 1
                        if(i1 + i2 + i3 == i4 + i5 + i6){
                            k <- k + 1
                        }
                    }
                }   
            }   
        }
    }
}


cat("Количество рассмотренных комбинаций ", n, "\n")
## Количество рассмотренных комбинаций  1e+06
cat("Количество билетов ", k)
## Количество билетов  55252