Сколько можно купить быков, коров и телят, платя за быка 10 рублей, за корову-5 рублей, а за телёнка 0.5 рублей, если на 100 рублей надо купить 100 голов скота — 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 

Leave a Comment