Покупатель должен заплатить в кассу S руб.У него имеются купюры по 1,5,10,50,100,500,1000 и 10000 руб.Сколько купюр разного достоинства отдаст покупатель,если он начинает платить с самых крупных купюр? Это паскаль,нужно через while сделать
var s,q:integer; j:TNominals; begin readln(s); for j:=High(TNominals) downto Low(TNominals) do begin q:=trunc(s/NomToNum[j]); writeln(NomToNum[j],':',q); s:=s-q*NomToNum[j]; end;
более месяца назад
Ваш ответ:
Вы можете из нескольких рисунков создать анимацию (или целый мультфильм!). Для этого нарисуйте несколько последовательных кадров
и нажмите кнопку Просмотр анимации.