Найти закономерность и продолжил последовательность: 00001,00010,00100,

vara,b: integer; c: real; beginwriteln ('введите 1 число'); read (a); writeln ('введите 2 число'); read (b); c: =(a/1)/(1/b); writeln (c); end.

в одном байте восемь бит. следовательно 100/8=12.5

  ответ 12.5