Перевод 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.

Оцени полезность:

6   голосов , оценка 4 из 5
Похожие ответы