12. Молекулы ДНК (дезоксирибонуклеиновой кислоты) состоят из четырех различных составляющих (нуклеотидов), которые образуют генетический алфавит. Информационная емкость знака этого алфавита составляет? ..ответ обоснуйте.

Не знаю на каком языке надо было, но сделал на языке 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')

Объяснение: