<u>// PascalABC.NET 3.3, сборка 1625 от 17.01.2018</u>
<u>// Внимание! Если программа не работает, обновите версию!</u>
uses GraphABC;
begin
var p1:=Arr((220,100),(260,100),(300,140),(240,140),(240,180),
(280,220),(280,280),(220,320),(160,320),(100,260),(140,260),
(180,220),(220,220),(200,180),(200,140));
DrawPolygon(p1); FloodFill(200,300,clYellow); // тело
p1:=Arr((160,320),(160,340),(200,340),(180,360),(160,340));
Polyline(p1); FloodFill(180,350,clDarkOrange); // лапа 1
p1:=Arr((220,320),(220,340),(260,340),(240,360),(220,340));
Polyline(p1); FloodFill(240,350,clDarkOrange); // лапа 2
Line(260,140,280,120); FloodFill(280,130,clRed); // клюв
Brush.Color:=clWhite; Circle(260,120,5); // контур глаза
Brush.Color:=clBlack; Circle(260,120,2) // зрачок
end.
CBA - не подходит, так как на третьем месте стоит A;
EED - подходит;
AED - подходит;
CEC - подходит;
EBB - подходит;
BAE - не подходит, так как на первом месте стоит B;
CEA - не подходит, так как на третьем месте стоит A;
ABE - подходит;
CBD - подходит;
Ответ: 6 цепочек.
256000 * 28 = 7168000 бит = 896000 байт = 875 Кбайт
Ответ: 875
Получается, мы должны найти кол-во чисел в диапазоне от минимального числа из одиннадцати цифр - это единица и десять нулей, до максимального из тридцати цифр - это число состоящее из тридцати девяток. Данное кол-во чисел равно разности наибольшего и наименьшего. Наименьшее число состоит из единицы и нулей, как мы поняли раньше, а значит только одна из цифр числа с тридцатью девятками изменится и станет восьмеркой. Следовательно, в таком числе будет двадцать девять девяток и одна восьмерка, значит ответом будет: Двадцать девять.