Перевод IP-адреса в двоичную систему счисления - Turbo Pascal

Формулировка задачи:

Ребят,у меня проблема.Вот задача:Известно, что IP-адрес записывается в нескольких вариантах. Наиболее известен «человеческий» вариант. Например, 192.168.0.1. Программа получает запись IP-адреса в «человеческом» виде и преобразует его к двоичному виду. При этом каждый байт должен состоять из восьми разрядов. Байты отделяются друг от друга пробелами. Точки между байтами не допускаются.Мне бы алгоритм ну или просто объясните на примере ,а то додуматься не могу.

Решение задачи: «Перевод IP-адреса в двоичную систему счисления»

textual
                            Листинг программы 
                        

                            var
  s: String;
  i, p, t, e, m: Integer;
begin
  Write('IP: '); ReadLn(s); s:=s+'.';
  for i:=1 to 4 do begin
    p:=Pos('.',s); Val(Copy(s,1,p-1),t,e); Delete(s,1,p); Write(' ');
    m:=$80; repeat Write(Ord(t and m<>0)); m:=m shr 1; until m=0;
  end; WriteLn;
end.
                        