Представить натуральное число N в двоичной системе счисления - Pascal ABC

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

Написать программу , которая представляет натуральное число N в двоичной системе счисления . Использовать рекурсию . Помогите пожалуйста , никака не могу разобраться !)

Решение задачи: «Представить натуральное число N в двоичной системе счисления»

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

procedure dectobin(dec:word;var res:string);
var s:string;
begin
 if dec>1 then dectobin((dec div 2),res) else res:='';
 str((dec mod 2),s);
 res:=res+s;
end;
var N:word;
    s:string;
begin
write('Vvedite chislo n=');
readln(n);
dectobin(n,s);
writeln(s);
end.

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

В процедуре dectobin переменной res присваивается значение пустой строки.
Если dec больше 1, то вызывается рекурсивно процедура dectobin с аргументом dec/2 и переменной res присваивается результат.
Если dec равно 1, то переменная res присваивается пустая строка.
Переменная s инициализируется строкой, представляющей остаток от деления dec на 2.
Результат деления dec на 2 записывается в переменную s.
Значение переменной s добавляется к переменной res.
Конец процедуры.
В основной части программы считывается число n от пользователя.
Вызывается процедура dectobin с аргументом n и переменной s присваивается результат.
Результат выводится на экран.