Программа на паскале. составить программу превода натурального числа n из 10 системы счисления в 8 систему счисления через рекурсию. что число натуральное, проверять не надо. если что то не понятно, спрашивайте)

PascalABC.NET 3.2

function TranslateFrom10To8(n: integer): string;
begin
  if n = 0 then
    result := ''
  else
    result := TranslateFrom10To8(n div 8) + IntToStr(n mod 8);
end;

begin
  var N := ReadInteger();
  print(TranslateFrom10To8(N));
end.