IP-адрес преобразовать к двоичному виду - Free Pascal

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

Известно, что Ip-адрес записывается в нескольких вариантах. Наиболее известен "Человеческий" вариант. Например 192.168.0.1. Программа получает запись IP-адреса в "человеческом" виде и преобразует его к двоичному виду. При этом каждый байт должен состоять из 8 разрядов. Байты отделяются друг от друга пробелами. Точки между байтами не допускаются.

Решение задачи: «IP-адрес преобразовать к двоичному виду»

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

uses sysutils, strutils;
var
  s : string;
  i : integer;
begin
  readln(s);
  for i := 1 to WordCount(s, ['.']) do
    write(IntToBin(StrToInt(ExtractWord(i, s, ['.'])), 8) + ' ');
end.

Объяснение кода листинга программы

Используемые модули: sysutils, strutils.
Переменные:
- s: строка, содержащая IP-адрес;
- i: целочисленный счётчик.
Ввод IP-адреса с помощью функции readln(s).
Цикл for i := 1 to WordCount(s, ['.']) выполняет разбиение строки s на отдельные слова (домены) по точке ('.') и выводит каждое слово.
Функция IntToBin преобразует целое число в двоичное представление.
Функция StrToInt преобразует строку в целое число.
Функция ExtractWord(i, s, ['.']) извлекает i-ый элемент (слово) из строки s, разделенной точками ('.').
Каждое слово выводится с помощью функции write в формате двоичного числа, дополненного слева нулями до 8 цифр.
Между словами добавляется пробел.
Пример вывода: 11000000 11000001 11000010 11000011.