Какой логической функции соответствует данная схема?

заранее

если хранить без знака, то диапазон от 0 до 15(2^3+2^2+2^1+2^0) 

100*1000000/8=12500000 байт в секунду

моя улица в солнечной системе. это земля. она находится третьей от солнца. 

var

  a,b: longint;

begin

  readln(a,b);

  while a> 0 do

  begin

    if a mod 10=b then

  begin

    writeln('est');

    halt;

  end;

  a: =a div 10;

end;

writeln('net');

end.