Переведите числа 1)11010010 в десятичную систему счисления 2)172 в двоичную систему счисления прошу надо

1) 210 в 10 сс 2) 10101100 в 2 сс

1)  11010010=210; 2)  172= 1 0101100.

Var    i,j,j3,k,k3,n: longint;     c: real; begin  // константа, 1/корень кубический из двух  c: =1.0/power(2,1.0/3.0);   writeln('n=? ');   readln(n);   // основной цикл, пробуем разбивать i на сумму кубов    for i: =1 to n do  begin    // первое число, от 1 до корня кубического из (i/2)    for j: =1 to floor(power(i,1.0/3.0)*c) do    begin      // куб первого числа      j3: =j*j*j;       // куб второго числа, или не куб, позже проверим      k3: =i-j3;       // само второе число      k: =round(power(k3,1.0/3.0));       // проверка, является ли k3 кубическим      if ((k3 = k*k*k) and (k> 0)) then        // да, к3 - куб : )        writeln('i=',i,' j=',j,' k=',k);     end;       end; end.

Вес символа в unicode - 2 байта, или 16 бит, или 2^4 бит. информационный объём файла - 15кбайт, или 15 * 1024 байт, или 15 * 2^10 байт,  или 15 * 2^10 * 2^3 бит,  или 15 * 2^13 бит. одна строка -  64 символа, или 2^6. рассчитаем сколько весит одна строка = вес одного символа * кол-во символов = 2^4 * 2^6 = 2^10 бит.  найдем кол-во строк = информационный объём файла / вес одной строки = (15 * 2^13) / 2^10 = 15 * 2^(13 - 10) = 15 * 2^3 = 15 * 8 = 120 строк. в файле 10 страниц, следовательно на одной странице 12 строк. ответ: 12 строк.