Страница 147 §3.3 номер 10, ГДЗ по информатике за 8 класс к учебнику Босовой

program z10;var k1000,k500,k100,k50,summ: integer;begin writeln('введи сдачу'); readln(summ); k1000:=summ div 1000; k500:=summ mod 1000 div 500; k100:=summ mod 500 div 100; k50:=summ mod 100 div 50; writeln('Следует сдать:'); writeln('блакнот по 1000 руб. - ',k1000,’ шт.’); writeln('блакнот по 500 руб. - ',k500,’ шт.’); writeln('блакнот по 100 руб. - ',k100,’ шт.’); writeln('блакнот по 50 руб. - ',k50,’ шт.’);end.