Год Куликовой битвы: 1380 г.
На рассвете 8 сентября 1380 года русский монах Александр Пересвет и монгольский воин Челубей по традиции сошлись в битве один на один. Бой не принес победу ни одному из них — смертельно ранив друг друга копьями, оба воина пали. И тогда монгольское войско и дружина Дмитрия Донского, благословленная Сергием Радонежским, начали битву.
Засадный полк.Хотя русские войска сражались храбро, по численности монголы значительно их превосходили. Уже начинало казаться, что Мамай одержит победу в этом бою — но Дмитрий Донской полагался не только на мужество своих воинов, но и на хитрую тактику.
В засаде был оставлен полк из более десяти тысяч воинов под командованием Дмитрия Боброка. В самый тяжелый момент сражения конница неожиданно вылетела из леса. Решив, что это подоспели к полю битвы основные силы русских, монголы обратились в бегство.
После этого боя князь Дмитрий Иванович и получил прозвище, под которым вошел в историю — «Донской» (Куликовское поле находится неподалёку от реки Дон).
Итоги и историческое значение Куликовской битвы.Несмотря на то, что татаро-монгольское иго продержалось на Руси еще ровно сто лет, Куликовская битва имела огромное значение для народа. После нее стало понятно, что Золотая Орда не является непобедимой, что ее можно сломить, и что обретение Русью свободы — только вопрос времени.
var b,i,z,k: integer;
a: array[1..10000] of integer;
begin
read(b);
z: =0;
k: =0;
while b> 0 do
begin
z: =z+1;
a[z]: = b mod 10;
b: =b div 10;
end;
for i: =2 to z-1 do
if a[i]=a[i-1] or a[i]=a[i+1] then
k: =1;
if k=1 then writeln (‘да’)
else writeln (‘нет’);
end.
второй способ:
var a,b,c: integer;
begin
read(a);
k: =0;
c: =10; // это должно быть обязательно число, но не цифра
while a > 0 do
begin
b: =a mod 10;
a: =a div 10;
if b=c then k: =1;
c: =b;
end;
if k=1 then writeln (‘да’)
else (‘нет’);
end.