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.
ответ:
пошаговое объяснение:
во время финиша вити паша пробежал 1000-200=800метров, а коля 800-200=600 метров.
если паше бежать 200 метров за 30 секунд, значит приоавной своей скорости он пробежал 800/200*30= 120 секунд (2минуты), а 1000 метров пробежит за 120(уже пробежал)+30(осталось)=150 секунд.
при этом, коля за 120сек.пробежал 600метров: 600 и 120 имеют общий делитель 6: 600/6=100метров и 120/6=20секунд. таким образом можно утверждать, что коля 100 метров бежит за 20 секунд., а 1000 метров = 100метров*10, т.е при такой скорости коля будет бежать 20*10= 200 секунд.
находим разницу во времени забега коли и паши: 200-150=50 секунд. т.е. коля финиширует на 50 секунд позже паши и (если что) на 80 секунд позже вити.
ответ: 5 сторон, 9 сторон, 10 сторон, 12 сторон.