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

Вы не указали требуемый язык программирования, поэтому написал решение на C# , используя средства этого языка :

using System;

using System.Linq;

class MainClass

{

   public static void Main(string[] args)

   {

       int k = 0;

       int[] E = new int[7];

       int[] K = new int[7];

       for (int i = 0; i < 7; i++)

           E[i] = Convert.ToInt32(Console.ReadLine());

       for (int i = 0; i < 7; i++)

           K[i] = E[i] * E[i];

       Console.WriteLine("Элементы массива E : ");

       foreach (int M in E)

           Console.WriteLine(M);

       Console.WriteLine("\nНомер минимального элемента массива K : " + Array.IndexOf(K, K.Min()));

       foreach (int M in E)

           if (M % 2 == 1)

               k++;

       Console.WriteLine("\nКоличество нечетных эелементов в массиве E : " + k);

   }

}

javascript: function Пр(ч) { var стр = ч.toString(); for (let сч = 1; сч < стр.length; сч++) { let ч1 = parseInt(стр.substring(0, сч)), ч2 = parseInt(стр.substring(сч)); if (ч1 > ч2) continue; let к1 = Math.sqrt(ч1), к2 = Math.sqrt(ч2); if (к1 == Math.floor(к1)) { for (let сч1 = 1; сч1 < 10 && сч1 < ч2 - 1; сч1++) for (let сч2 = 1; сч2 * сч2 + сч1 * сч1 <= ч2; сч2++) if (сч2 * сч2 + сч1 * сч1 == ч2 && Math.pow(сч1 + сч2, 2) == ч1) return ч + ": " + сч1 + ", " + сч2; } if (к2 == Math.floor(к2)) { for (let сч1 = 1; сч1 < 10 && сч1 < ч1 - 1; сч1++) for (let сч2 = 1; сч2 * сч2 + сч1 * сч1 <= ч1; сч2++) if (сч2 * сч2 + сч1 * сч1 == ч1 && Math.pow(сч1 + сч2, 2) == ч2) return ч + ": " + сч1 + сч2; } }; return ч + ": -"; } [2949, 10, 11, 25, 95, 2036, 3264, 6581].forEach(function (зн) { alert(Пр(зн)); });