Сформулируйте правило перевода чисел из двоичной системы счисления в десятичную систему счисления

1) считаешь кол-во цифр, и сопостовляешь им степени 2 сомому правому-2^0
2) слагаешь их
пример: 11001=1*2^4+1*2^3+0*2^2+0*2^1+1*1^0= 16+8+0+0+1=25

Современный компьютер может обрабатывать числовую, текстовую, графическую, звуковую и видео информацию. Все эти виды информации в компьютере предоставлены в двоичном коде, т.е. используется алфавит мощностью всего два символа 0 и 1. Связано это с тем, что удобно представлять информацию в виде последовательности электрических импульсов: импульс  отсутствует- 0, импульс есть -1.Такое кодирование принято называть двоичным, а сами логические последовательности нулей и единиц- машинным языком.
Каждая цифра  машинного двоичного кода несет количество информации равное одному биту.

Var
   a,b,d,K,kp:integer;
   P:boolean;
Begin
kp:=0;
ReadLn(a,b);
if (a = 1)or(a = 2) then
   Begin
   kp:=2;
   Write(2,' ',3)
   end
else if a = 3 then
        Begin
        kp:=1;
        Write(3);
        End;
if a < 5 then a:=5
else if a mod 2 = 0 then a:=a+1;
While a<=b do
   Begin
   K:=Trunc(Sqrt(A));
   d:=3;
   P:=true;
   While d <= K do
      Begin
      if A mod d = 0 then P:=false;
      d:=d+2
      End;
   if P then
      Begin
      kp:=kp+1;
      Write(' ',a);
      End;
   a:=a+2
   End;
if kp = 0 then Write(0)
End.