На ферме установлены следующие расценки:бык стоит 25 000р.,скотина - 16 000р.,телёнок

На ферме установлены следующие цены:
бык стоит 25 000р.,
скотина - 16 000р.,
телёнок - 2000р..
Составьте метод, позволяющий найти все варианты покупки на этой ферме 100 голов скота на сумму 500 000р..

Задать свой вопрос
1 ответ
Const m=500000; p1=25000; p2=16000; p3=2000; n=100;
var k1,k2,k3:integer;
begin
 for k1:=0 to m div p1 do
  for k2:=0 to (m-k1*p1) div p2 do
    begin
    k3:=n-k1-k2;
    if k1*p1+k2*p2+k3*p3=m then writeln(k1,' ',k2,' ',k3);
    end;
end.

Итог:
10 5 85
, оставишь ответ?
Имя:*
E-Mail:


Последние вопросы

Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт