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.
удожественная гимнастика - вид спорта, соревнования женщин в выполнении под музыку комбинаций из различных пластичных и динамичных гимнастических и танцевальных упражнений с предметом:
- лентой - лента длиной 7 м изготавливается из атласа или подобного материала. Она крепится к цилиндрической палочке 50-60 см длиной;
- мячом - мяч должен быть изготовлен из резины или мягкого пластика. Диаметр мяча 18-20 см, вес - не менее 400 г;
- обручем - обруч изготовлен из дерева или пластика, внутренний диаметр 80-90 см. Обруч должен весить не менее 300 г;
- скакалкой - скакалка сделана из пеньки или подобного материала, не имеет стандартной длины, потому что длина зависит от роста гимнастки;
- булавами - используются две бутылочной формы булавы равной длины (40-50 см), в узкой части заканчивающиеся небольшим закруглением. Изготавливаются из дерева или пластика. Вес каждой - не менее 150 г. Имеют широкую часть - тело, узкую - шейка и круглый наконечник - головка (максимальный диаметр - 30 мм).
А также выполняются танцевальные упражнения без предмета.
50х + 10х = 180
60х = 180х=3
3 десетикопеечные монеты и 3 пятидесятикопеечные
ответ: 3 десетикопеечные монеты