Показать, что любую сумму, большую 7 копеек, можно выплатить, используя только 3-х и 5-ти копеечные монеты. (то есть, для любого целого n> 7 найти такие целые числа x и y, что 3x+5y=n ). написать программу в pascal

макс240723212321 макс240723212321    1   27.09.2019 07:50    4

Ответы
violetakoshtura violetakoshtura  08.10.2020 22:15

program Diofant;

var

 n, x, y: integer;

begin

 n := 125;

 {3x + 5y = n, n >= 0, x >= 0, y >= 0;

 n - 5y >= 0, y <= n / 5}

 for y := 0 to n div 5 do

 begin

   if (n - 5 * y) mod 3 = 0 then

   begin

     x := (n - 5 * y) div 3;

     Writeln('3 * ', x, ' + 5 * ', y, ' = ', n)

   end;

 end;

 Readln;

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика

Популярные вопросы