Сколько можно купить быков, коров и телят, платя за быка 10 рублей, за корову-5 рублей, а за телёнка 0.5 рублей, если на 100 рублей надо купить 100 голов скота?
Категория: Basic
2011-12-20 16:34:34
code: #basic
n = 100 'надо голов c = 100 'всего денег k1 = 10 'цена за быка k2 = 5 'за корову k3 = 0.5 'за теленка FOR i = 0 TO c\k1 FOR j = 0 TO c\ k2 FOR k = 0 TO c\k3 IF i + j + k = n AND i * k1 + j * k2 * k * k3 = c THEN PRINT "Быков:"; i;" Коров:" ; j; " Телят:"; k NEXT NEXT NEXT
автор: кот Бегемот
Поделиться: