1.
Исполнитель, работающий с положительными однобайтными двоичными числами, выполняет две команды, которым присвоены номера: 1 - сдвинь влево, 2 - вычти 1. Операция сдвига влево аналогична умножению на 2. Исполнитель начал вычисления с числа 105 и выполнил цепочку команд 1122. Результат выполнения алгоритма в десятичной системе счисления:
1)105
2)205
3)418
4)414

var

  s: string;

  i: longint;

begin

  readln(s);

for i: =1 to length(s) div 2 do write(s[i]);

end.

138 байт,потому что 1024 бита=128 байт=> 10+128=138 как-то так.

грубо и сердито:

var c: longint;

begin

  read(c);

  c: =c mod 10;

  c: =sqr(c);

  writeln(c);

end.

минимально возможное число бит для десятичных цифр равно 4,значит инф объем = 150симв * 4бит =600 бит,

ответ: 600 бит