<u>// PascalABC.NET </u>
<u>// Версия 3.3.5 сборка 1662 (29.04.2018)</u>
begin
for var i := ReadInteger('n->') to ReadInteger('k->') do
if i.ToString.OrderBy(t -> t).AdjacentGroup.Where(t -> t.Count = 3).Count > 0
then i.Println;
end.
<u>Пример:</u>
k-> 1170
n-> 1111
1112
1113
1114
1115
1116
1117
1118
1119
1121
1131
1141
1151
1161
Slovo nachinaetsja i zakanchivaetsja na odnu i tu zhe bukvu. Eto slovo "кортик".
Esli bukva "и" imeet nomer 1 (to est' stoit na pervom meste), to progovarivaja alfavit dal'she, poluchaem bukvu "к", kotoraja budet tret'ej. I tak dalee so vsemi ostavshimisja bukvami - "р" na 9-m meste i "о" na 7-m meste
<span>
Шестнадцатеричная Двоичная
</span><span>E <span>1110
</span></span><span><span>B </span><span>1011
</span></span>
Процессор взаимодействует с оперативной памятью не напрямую, а через специальный контроллер, подключенный к системной шине процессора приблизительно так же, как и остальные контроллеры периферийных устройств