с объяснением запишите числа в развернутой форме числа 143, 511 в 10 143 511 в 8 143 511 в 16 1435,11 в 8

Const 
n=5;

Var
 ar:array[1..n] of integer;
 ar2:array[1..n] of integer;
 i,k:integer;

 function prost(a:integer):boolean;
 var i:integer;
 b:boolean;
  begin
  b:=true;
   for i:=2 to a div 2 do
    if a mod i=0 then
     begin;
      b:=false;
      break;
     end;
   if a=1 then b:=false;
  prost:=b;
 end;

  begin;
 randomize;
 k:=0;
  for i:=1 to n do
   begin;
    ar[i]:=random(101);
    write(ar[i]:4);
   end;
  writeln;
  for i:=1 to n do
  if prost(ar[i]) then
   begin;
    inc(k);
    ar2[k]:=ar[i];
    write(ar2[k]:4);
   end;
end.

Допустим, у меня операционная система Windows 10.

1} Физических дисководов два:

- первый разбит на три логических диска C:\, D:\ и F:\

- второй разбит на два логических диска G:\ и H:\

То есть всего логических дисководов 5.

2}

- имя файла состоит из собственно имени и расширения, разделённых точкой

- разрешены длинные имена файлов

- в имени файла запрещены символы  \ / ? : * " > < |

- нельзя использовать системные имена CON, NUL, AUX, PRN, COM1 - COM9, LPT1 - LPT9

- разрешены имена как на английском, так и на других языках

- разрешены пробелы в имени файла

3} Путь к файлу на диске указывает, где именно (в какой папке) находится файл. Путь состоит из имени (буквы) дисковода, двоеточия и последовательности имён папок, вложенных одна в другую, в самой внутренней из которых лежит файл. Имена папок отделяются символом "обратный слеш": \

Например на диске Е есть папка Знания, в этой папке есть папка IT, в ней папка Задания, в ней папка Tasks, и в ней папка ответы. А в папке ответы лежит файл 30678346.txt

Путь к файлу такой:

Е:\Знания\IT\Задания\Tasks\ответы

Полное имя файла состjит из пути и собственного имени файла:

Е:\Знания\IT\Задания\Tasks\ответы\30678346.txt