Составить метод решения последующей задачки :Сколько можно купить быков,коров и телят,платя

Пусть b - количество быков, k - количество скотин, t - количество телят.
Тогда можно составить систему уравнений

Два уравнения, три неизвестных. Придется решать перебором вариантов.
Но прямой перебор - это неинтересно. Попробуем оптимизировать.
На 100 рублей можно покупать максимум 100/10=10 быков, или 100/5=20 скотин, либо 100/0.5=200 телят. Без телят не обойтись, даже 18 скотин и бык - это 19 голов, а нужно 100. Выбирать необходимое количество из 200 хуже, чем из 20 либо 10, потому сделаем подмену, чтоб избавиться от t.
Из второго уравнения следует, что t=100-b-k.    (1)
Подставим значение t в 1-ое уравнение:
10b+5k+0.5(100-b-k)=100;
10b+5k+50-0.5b-0.5k=100;
9.5b+4.5k=50;
19b+9k=100 k=(100-19b)/9    (2)
Укрупненный метод:
Перебираем b от 0 до 9 (10 нельзя, истратим все 100 рублей, а телят покупать надобно!).
Для каждого b обретаем k по формуле (2). Если оно целочисленное, обретаем t по формуле (1). Решение найдено. По другому перебор длится.

var
  b,k,t:integer;
  v:real;
    
begin
  for b:=0 to 9 do
    if (100-19*b) mod 9=0 then begin
      k:=(100-19*b) div 9;
      t:=100-b-k;
      Writeln('Быков ',b,', скотин ',k,', телят ',t);
      break
      end;
end.

Решение
Быков 1, скотин 9, телят 90