с задачей по информатике! Предположим, мы посчитали что за два года студент получил 103 оценки. Среди них: 55 пятёрок, 28 четвёрок, 14 троек, и 6 двоек. Найти количество информации содержащейся в сообщении о получении нашим студентом каждой из оценок.

//PascalABC.NET версия 3.4.0.1677 от 17.06.18

//Если программа не запускается, то обновите версию

begin

   var zarazheno := 1;

   var sum := zarazheno;

   for var i := 1 to 4 do

   begin

       zarazheno *= 10;

       sum += zarazheno;

       WritelnFormat('{2} Новозараженно = {0}, всего заражено = {1}', zarazheno, sum, i);

   end;

end.

Вывод

1 Новозараженно = 10, всего заражено = 11

2 Новозараженно = 100, всего заражено = 111

3 Новозараженно = 1000, всего заражено = 1111

4 Новозараженно = 10000, всего заражено = 11111

Матричный принтер содержит печатающую головку с 9 или 24 иголками. Иголки нажимают на ленту с красящим слоем и оставляют точки на бумаге. В струйном принтере печатающая головка выплевывает краску из сопел на бумагу под действием давления. А в лазерном принтере есть специальный барабан, который лазером же намагничивается в определенных местах. Потом он собирает графитную краску на намагниченные места и прокатывается по листу бумаги, перенося ее. У лазерного принтера, как видно, сухой принцип работы.