Решите в Паскаль ABC

Составить программу, решающую следующую задачу: Вы покупаете товар, и у Вас

имеются монеты номиналом 1, 2, 5, 10 рублей. Наберите необходимую сумму товара в

N рублей так, чтобы она состояла из минимального

количества монет.

Question

Информатика

Дареша

26 сентября, 17:16

Решите в Паскаль ABC

Составить программу, решающую следующую задачу: Вы покупаете товар, и у Вас

имеются монеты номиналом 1, 2, 5, 10 рублей. Наберите необходимую сумму товара в

N рублей так, чтобы она состояла из минимального

количества монет.

+3

Ответы (1)

Знаешь ответ?

Галла · Answer 1

Var a: integer;

begin

readln (a);

writeln (a div 10, 'x10, ', a mod 10 div 5, 'x5, ', a mod 10 mod 5 div 2, 'x2, ', a mod 50 mod 5 mod 2 div 1, 'x1');

end.