17 баллов, сделать на паскале
Нужно заплатить S рублей, есть купюры 100, 50,10,2,1 рубль. Сколько купюр каждого достоинства нужно отдать покупателю, если он будет платить с самых крупных.

var s,k1,k2,k3,k4,k5:integer;beginwrite('s='); readln(s);k1:=s div 100;k2:=s mod 100 div 50;k3:=s mod 50 div 10;k4:=s mod 10 div 2;k5:=s mod 2;writeln('100 - ',k1,',  50 - ',k2,',  10 - ',k3,',  2 - ',k4,',  1 - ',k5);end.Пример:s=463100 - 4,  50 - 1,  10 - 1,  2 - 1,  1 - 1