Цепочка из 4 бусин помеченных латинскими буквами,формируется по следующему правилу: -на втором месте цепочки стоит одна из бусин h.a.c -в конце одна из бусин a.e.c ,которой нет на втором месте -в начале одна из бусин h.e.d,не стоящая на первом месте определите сколько из перечисленных цепочек созданы по этому правилу? dcce haca dhde hhda ecde dhac eacd ahec hcee

Не знаю на каком языке надо было, но сделал на языке Pascal

1.

var s:string;

k,i:integer;

begin

 readln(s);

 k := length(s);

 writeln(k);

end.

2.

var a,b:string;

i:integer;

begin

 writeln('Введите первую фамилию');

 readln(a);

 writeln('Введите вторую фамилию');

 readln(b);

 i:=length(a)-length(b);

 if i>0 then

   writeln('Первая фамилия длиннее')

 else writeln('Вторая фамилия длиннее')

end.

еще как вариант второго номера:

var a,b:string;

i:integer;

begin

 writeln('Введите первую фамилию');

 readln(a);

 writeln('Введите вторую фамилию');

 readln(b);

 i:=length(a)-length(b);

 if i>0 then

   writeln('Фамилия ', a, ' длиннее фамилии ', b)

 else writeln('Фамилия ', b, ' длиннее фамилии ', a)

end.

# Пусть белый цвет это false и соответственно черный true

эта функция определяет цвет по ее координатам, которые не больше числа 8

def checkColor(x, y):

   assert x <= 8 and y <= 8

   color = None

   if x % 2 == 0:

       if y % 2 == 0:

           color = True

       else:

           color = False

   else:

       if y % 2 == 0:

           color = False

       else:

           color = True

   return color

# Задаем координаты первой и второй позиции

k, l, m, n = map(int, input().split())

if checkColor(k, l) == checkColor(m, n):

   print('YES')

else:

   print('NO')

Объяснение: